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PREFACE 


This  document  provides  Version  2.1.04  Computer  Software  Configuration  Item  documents  for  the 
Advanced  Propagation  Model  (APM).  The  APM  calculates  range-dependent  electromagnetic  system 
propagation  loss  and  propagation  factor  within  a  heterogeneous  atmospheric  medium  over  variable 
terrain,  where  the  radio-frequency  index  of  refraction  is  allowed  to  vary  vertically  and  horizontally. 

The  first  document  specifies  the  functional  requirements  that  are  to  be  met  by  the  APM  CSCI.  A 
discussion  of  the  input  software  requirements  is  presented  together  with  a  general  description  of  the 
internal  structure  of  the  APM  CSCI  as  it  relates  to  the  CSCI’s  capability. 

The  second  document  describes  the  design  of  the  APM  CSCI.  An  overview  of  the  input  software 
requirements  is  presented  together  with  an  overview  of  the  CSCI  design  architecture  and  a  detailed 
design  description  of  each  CSCI  component. 

The  third  document  specifies  the  test  cases  and  test  procedures  necessary  to  perform  APM  CSCI 
qualification  testing.  A  discussion  of  precise  input  values  of  each  input  variable  required  to  perform 
the  test  together  with  final  expected  test  results  is  presented. 
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1.  SCOPE 


1.1  IDENTIFICATION 

The  Advanced  Propagation  Model  (APM)  Version  2.1.04  computer  software 
configuration  item  (CSCI)  calculates  range-dependent  electromagnetic  (EM)  system 
propagation  loss  within  a  heterogeneous  atmospheric  medium  over  variable  terrain, 
where  the  radio-frequency  index  of  refraction  is  allowed  to  vary  vertically  and 
horizontally,  also  accounting  for  terrain  effects  along  the  path  of  propagation. 

1.2  SYSTEM  OVERVIEW 

The  APM  CSCI  model  calculates  propagation  loss  values  as  EM  energy 
propagates  through  a  laterally  heterogeneous  atmospheric  medium  where  the  index  of 
refraction  is  allowed  to  vary  vertically  and  horizontally,  also  accounting  for  terrain 
effects  along  the  propagation  path.  Numerous  external  applications  require  EM-system 
propagation  loss  values.  The  APM  model  described  by  this  document  may  be  applied  to 
two  external  applications,  one  that  displays  propagation  loss  on  a  range  versus  height 
scale  (commonly  referred  to  as  a  coverage  diagram)  and  one  that  displays  propagation 
loss  on  a  propagation  loss  versus  range/height  scale  (commonly  referred  to  as  a  loss 
diagram). 

1.3  DOCUMENT  OVERVIEW 

This  document  specifies  the  functional  requirements  that  are  to  be  met  by  the 
APM  CSCI.  A  discussion  of  the  input  software  requirements  is  presented  together  with  a 
general  description  of  the  internal  structure  of  the  APM  CSCI  as  it  relates  to  the  CSCI’s 
capability. 
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3.  REQUIREMENTS 

3.1  CSCI  CAPABILITY  REQUIREMENTS 

The  required  APM  CSCI  propagation  model  is  a  range-dependent  true  hybrid 
model  that  uses  the  complimentary  strengths  of  Ray  Optics  (RO)  and  Parabolic  Equation 
(PE)  techniques  to  calculate  propagation  loss  both  in  range  and  altitude. 

The  atmospheric  volume  is  divided  into  regions  that  lend  themselves  to  the 
application  of  the  various  propagation  loss  calculation  methods.  Figure  1  illustrates  these 
regions. 
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Figure  1.  APM  calculation  regions. 

For  antenna  elevation  angles  above  5  degrees  or  for  ranges  less  than 
approximately  2.5  kilometers  (km),  a  flat-earth  (FE)  ray-optics  model  is  used.  In  this 
region,  only  receiver  height  is  corrected  for  average  refraction  and  earth  curvature. 

Within  the  RO  region  (as  defined  by  a  limiting  ray),  propagation  loss  is  calculated 
from  the  mutual  interference  between  the  direct-path  and  surface-reflected  ray 
components  using  the  refractivity  profile  at  zero  range.  Full  account  is  given  to  focusing 
or  de-focusing  along  direct  and  reflected  ray  paths  and  to  the  integrated  optical  path 
length  difference  between  the  two  ray  paths,  to  give  precise  phase  difference,  and,  hence, 
accurate  coherent  sums  for  the  computation  of  propagation  loss. 

For  the  low-altitude  region  beyond  the  RO  region,  a  PE  approximation  to  the 
Helmholtz  full  wave  equation  is  employed.  The  PE  model  allows  for  range-dependent 
refractivity  profiles  and  variable  terrain  along  the  propagation  path  and  uses  a  split-step 
Fourier  method  for  the  solution  of  the  PE.  The  PE  model  is  run  in  the  minimum  region 
required  to  contain  all  terrain  and  trapping  layer  heights. 

For  the  area  beyond  the  RO  region  but  above  the  PE  region,  an  extended  optics 
region  (XO)  is  defined.  Within  the  XO  region,  ray-optics  methods  that  are  initialized  by 
the  PE  solution  from  below,  are  used. 

APM  will  run  in  three  “execution”  modes  depending  on  environmental  inputs. 
APM  will  use  the  FE,  RO,  XO,  and  PE  models  if  the  terrain  profile  is  flat  for  the  first 
2.5  km  and  if  the  antenna  height  is  less  than  or  equal  to  100  m.  It  will  use  only  the  XO 
and  PE  models  if  the  terrain  profile  is  not  flat  for  the  first  2.5  km  and  if  the  antenna 
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height  is  less  than  or  equal  to  100  m.  For  applications  in  which  the  antenna  height  is 
greater  than  100  meters,  a  combination  of  FE  and  PE  methods  are  used.  The  FE  model  is 
used  for  all  propagation  angles  greater  than  ±5°  from  the  source  and  the  PE  model  is  used 
for  angles  within  ±5°.  By  default,  APM  will  automatically  choose  which  mode  of 
operation  it  will  use  for  a  specified  set  of  inputs.  However,  the  ability  to  run  only  the  PE 
model  for  any  case  is  allowed  by  setting  a  logical  flag  upon  input.  APM  will 
automatically  run  only  the  PE  algorithm  for  frequencies  less  than  50  MHz,  regardless  of 
the  logical  flag  set  by  the  user. 

The  APM  CSCI  allows  for  horizontal  and  vertical  antenna  polarization,  finite 
conductivity  based  on  user-specified  ground  composition  and  dielectric  parameters,  and 
the  complete  range  of  EM  system  parameters  and  most  antenna  patterns  required  by 
various  external  applications.  APM  also  allows  for  gaseous  absorption  effects  in  all  sub¬ 
models  and  computes  troposcatter  losses  within  the  diffraction  region  and  beyond. 

The  program  flow  of  the  required  APM  CSCI  is  illustrated  Figure  2.  Note  that 
the  APM  CSCI  is  shown  within  the  context  of  a  calling  CSCI  application  such  as  one  that 
generates  a  coverage  or  loss  diagram.  The  efficient  implementation  of  the  APM  CSCI 
will  have  far  reaching  consequences  on  the  design  of  an  application  CSCI  beyond  those 
mentioned  in  Section  3.10.  For  example,  Figure  2  shows  checking  for  the  existence  of  a 
previously  created  APM  output  file  prior  to  the  access  of  the  APM  CSCI.  The 
application  CSCI  will  have  to  consider  if  the  atmospheric  or  terrain  environment  has 
changed  since  the  APM  output  file  was  created  or  if  any  new  height  or  range  requirement 
is  accommodated  within  the  existing  APM  CSCI  output  file.  Because  these  and  many 
more  considerations  are  beyond  the  scope  of  this  document  to  describe,  an  application 
CSCI  designer  should  work  closely  with  the  APM  CSCI  development  agency  in  the 
implementation  of  the  APM  CSCI.  Figure  3  through  Figure  6  illustrate  the  program  flow 
for  the  main  compute  software  components  (CSC),  APMINIT  CSC,  APMSTEP  CSC, 
XOINIT  CSC,  and  XOSTEP  CSC,  respectively. 
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Enter  from  external 
application  menu 


External  application 
CSCI  initialization 


APM  output^  No 
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APM  CSCI 


APM  initialization 
(APMINIT  CSC) 


APM  range  step 
(APMSTEP  CSC) 


XO  initialization 

(xonsnr  esc) 


XO  range  step 
(XOSTEP  CSC) 


Figure  2.  Program  flow  of  the  APM  CSCI. 
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Figure  4.  APMSTEP  CSC  Program  flow. 
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XOINIT  CSC 


Figure  5.  XOINIT  CSC  Program  flow. 


Figure  6.  XOSTEP  CSC  Program  flow. 
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The  APM  CSCI  is  divided  into  5  main  computer  software  components  (CSC)  and 
67  additional  software  units  (SU).  The  name,  purpose,  and  a  general  description  of 
processing  required  for  each  SU  follows. 

3.1.1  Advanced  Propagation  Model  Initialization  (APMINIT)  CSC 

The  APMINIT  CSC  interfaces  with  various  SUs  for  the  complete  initialization  of 
the  APM  CSCI. 

The  atmospheric  volume  must  be  “covered”  or  resolved  with  a  mesh  of 
calculation  points  that  will  normally  exceed  the  height/range  resolution  requirements  of 
the  particular  application  of  the  APM  CSCI.  Upon  entering  the  APMINIT  CSC,  a  range 
and  height  grid  size  per  the  APM  CSCI  output  point  is  calculated  from  the  number  of 
APM  outputs  and  the  maximum  CSCI  range  and  height. 

A  TERINIT  SU  is  referenced  to  examine  the  terrain  profile.  The  minimum  terrain 
height  is  detennined,  and  then  the  entire  terrain  profile  is  adjusted  by  this  height  so  that 
all  internal  calculations  are  referenced  to  this  height.  This  is  done  in  order  to  minimize 
the  required  PE  transfonn  size. 

User-specified  environmental  and  system  parameters  are  examined  to  detennine  if 
the  APM  CSCI  will  execute  in  a  full  hybrid  mode,  a  partial  hybrid  mode,  or  PE-only 
mode. 


A  REFINIT  SU  is  referenced  to  initialize  the  external  CSCI  specified  modified 
refractivity  and  also  to  test  for  valid  environment  profiles.  A  PROFREF  SU  adjusts  the 
environment  profiles  by  the  internal  reference  height,  and  a  INTPROF  SU  defines  the 
modified  refractivity  at  all  PE  vertical  mesh  points. 

If  rough  surface  calculations  are  required  (i.e.,  a  non-zero  wind  speed  is  specified) 
a  GETANGLES  SU  is  referenced  to  determine  the  grazing  angles  for  the  given 
refractivity  profile.  The  grazing  angles  are  then  sorted  and  a  GRAZE  INT  SU  is 
referenced  to  combine  grazing  angles  computed  by  both  methods  (if  necessary)  and 
interpolate  for  subsequent  use  in  rough  surface  calculations. 

To  automatically  determine  the  maximum  PE  calculation  angle,  a  GETTHMAX 
SU  is  referenced.  This  determines,  via  ray  tracing,  the  minimum  angle  for  which 
adequate  coverage  can  be  given  with  the  specified  terrain  and  environment  profile.  A 
FFTPAR  SU  is  referenced  to  determine  the  fast  Fourier  transform  (FFT)  size  for  the 
calculated  angle  and  to  initialize  data  elements  within  the  PE  region  which  are  dependent 
on  the  size  of  the  FFT.  The  minimum  size  for  the  FFT  is  determined  from  the  Nyquist 
criterion.  An  option  also  exists  to  activate  only  the  PE  algorithm  within  the  APM  CSCI, 
regardless  of  inputs.  If  this  option  is  enabled,  the  PE  maximum  calculation  angle  is 
supplied  by  the  calling  CSCI. 
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If  vertical  polarization  is  specified,  then  additional  calculations  are  performed  in 
the  starter  solution  using  Kuttler  and  Dockery’s  mixed  transform  method.  In  this  case  a 
DIEINIT  SU  is  used  to  initialize  dielectric  ground  constants.  For  general  ground  types, 
the  permittivity  and  conductivity  are  calculated  as  a  function  of  frequency  from  curve  fits 
to  the  permittivity  and  conductivity  graphs  shown  in  recommendations  and  reports  of  the 
International  Radio  Consulting  Committee. 

A  PE  initialization  SU  (PEINIT)  is  referenced  to  initialize  all  variables  and  arrays 
associated  with  PE  calculations.  A  XYINIT  SU  and  an  antenna  pattern  factor  SU 
(ANTPAT)  are  referenced  to  generate  a  first  solution  to  the  PE.  A  FFT  SU  is  referenced 
for  data  elements  required  in  obtaining  the  PE’s  starting  solution. 

If  rough  surface  calculations  are  required,  or  if  one  is  perfonning  a  finite- 
conducting  boundary  case,  then  a  ALN_INIT  SU  is  referenced  to  initialize  field  variables 
used  in  the  mixed  transform  algorithm. 

If  running  in  a  full  hybrid  mode,  a  FILLHT  SU  is  referenced  to  determine  the 
heights  at  each  output  range  separating  the  FE,  RO,  and  PE  calculation  regions.  If 
running  in  a  partial  hybrid  or  PE-only  mode,  then  the  heights  at  each  output  range  are 
determined,  below  which,  propagation  loss/factor  solutions  are  valid.  No  propagation 
loss/factor  solutions  are  provided  above  these  heights  for  those  execution  modes. 

A  TROPOINIT  SU  is  referenced  to  initialize  all  variables  and  arrays  associated 
with  troposcatter  calculations  and  is  referenced  only  if  the  user  has  enabled  the  Tropo  flag. 

Finally,  a  GASABS  SU  is  referenced  to  initialize  the  attenuation  parameter  due  to 
oxygen  and  water  vapor  absorption. 

3.1. 1.1  Allocate  Arrays  APM  (ALLARRAY_APM)  SU 

The  ALLARRAY  APM  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  APM  terrain,  refractivity,  troposcatter,  and  general  variable  arrays. 

3.1. 1.2  Allocate  Array  PE  (ALLARRAY_PE)  SU 

The  ALLARRAY  PE  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  PE  calculations. 

3.1. 1.3  Allocate  Array  RO  (ALLARRAY_RO)  SU 

The  ALLARRAY  RO  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  RO  calculations. 

3.1. 1.4  Allocate  Array  XORUF  (ALLARRAY_XORU F)  SU 

The  ALLARRAY  XORUF  SU  allocates  and  initializes  all  dynamically 
dimensioned  arrays  associated  with  XO  and  rough  surface  calculations. 
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3. 1.1. 5  Alpha  Impedance  Initialization  (ALNJNIT)  SU 

The  ALN_INIT  SU  initializes  variables  used  in  the  discrete  mixed  Fourier 
transfonn  (DMFT)  algorithm  for  finite  conductivity  and/or  rough  surface  calculations. 

3.1. 1.6  Antenna  Pattern  (ANTPAT)  SU 

The  ANTPAT  SU  calculates  a  nonnalized  antenna  gain  (antenna  pattern  factor) 
for  a  specified  antenna  elevation  angle. 

From  the  antenna  beam  width,  elevation  angle  (an  angle  for  which  the  antenna 
pattern  factor  is  desired),  and  the  antenna  radiation  pattern  type;  an  antenna  factor  is 
calculated. 

3.1. 1.7  APM  Status  (APMSTATUS)  SU 

The  APMSTATUS  SU  accesses  the  current  status  of  APM  calculations  of  the 
grazing  angle.  The  SU  is  declared  as  an  external  subroutine  within  the  main  driver 
program. 

3. 1.1. 8  Dielectric  Initialization  (DIEINIT)  SU 

The  DIEINIT  SU  determines  the  conductivity  and  relative  permittivity  as 
functions  of  frequency  in  MHz  based  on  general  ground  composition  types. 

3.1. 1.9  FFT  Parameters  (FFTPAR)  SU 

The  FFTPAR  SU  determines  the  required  transform  size  based  on  the  maximum 
PE  propagation  angle  and  the  maximum  height  needed.  If  running  in  full  or  partial 
hybrid  modes,  the  maximum  height  needed  is  the  height  necessary  to  encompass  at  least 
20%  above  the  maximum  terrain  peak  along  the  path  or  the  highest  trapping  layer 
specified  in  the  environment  profiles,  whichever  is  greater.  If  running  in  a  PE-only 
mode,  the  maximum  height  needed  is  the  specified  maximum  output  height.  An  error  is 
returned  if  the  computed  transform  size  reaches  2  . 

For  computational  efficiency  reasons,  an  artificial  upper  boundary  must  be 
established  for  the  PE  solution.  To  prevent  upward  propagating  energy  from  being 
“reflected”  downward  from  this  boundary  and  contaminating  the  PE  solution,  the  PE 
solution  field  strength  should  be  attenuated  or  “filtered”  above  a  certain  height  to  ensure 
that  the  field  strength  just  below  this  boundary  is  reduced  to  zero. 

The  total  number  of  vertical  points  for  which  a  transfonnation  will  be  computed  is 
determined.  This  term  is  also  referred  to  as  the  FFT  size.  The  filtering  boundary  height  is 
also  determined. 

3.1.1.10  Fill  Height  Arrays  (FILLHT)  SU 

The  FILLHT  SU  calculates  the  effective  earth  radius  for  an  initial  launch  angle  of 
5°  and  to  fill  an  array  with  height  values  at  each  output  range  of  the  limiting  sub-model, 
depending  on  which  mode  is  being  used.  If  running  in  a  full  hybrid  mode,  the  array 
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contains  height  values  at  each  output  range  separating  the  FE  from  the  RO  region.  If 
running  in  other  inodes,  the  array  contains  those  height  values  at  each  output  range  at 
which  the  initial  launch  angle  has  been  traced  to  the  ground  or  surface.  For  an  execution 
mode  in  which  PE  and  XO  models  are  used,  these  height  values  represent  the  separating 
region  where,  above  that  height,  valid  loss  is  computed,  and  below  that  height,  no  loss  is 
computed.  This  is  done  so  only  loss  values  that  fall  within  a  valid  calculation  region  are 
output.  For  airborne  applications  in  which  a  combination  of  PE  and  FE  models  are  used, 
the  array  contains  the  height  values  at  each  range  separating  the  FE  and  PE  regions. 

3.1.1.11  Gaseous  Absorption  (GASABS)  SU 

The  GASABS  SET  computes  the  specific  attenuation  based  on  air  temperature  and 
absolute  humidity.  This  SET  is  based  on  CCIR  (International  Telecommunication  Union, 
International  Radio  Consultative  Committee,  now  the  ITU-R)  Recommendation  676-1, 
“Attenuation  by  Atmospheric  Gases  in  the  Frequency  Range  1-350  GHz.” 

3.1.1.12  Get  Effective  Earth  Radius  Factor  (GET_K)  SU 

The  GET  K  SU  computes  the  effective  earth  radius  factor  and  the  effective  earth 
radius.  The  computation  is  made  for  a  launch  angle  of  5°  if  the  SU  is  called  from  the 
APMINIT  CSC.  If  called  from  the  TROPOINIT  SU,  then  the  computation  is  made  for  a 
launch  angle  equal  to  the  critical  angle. 

3.1.1.13  Get  Alpha  Impedance  (GETALN)  SU 

The  GETALN  SU  computes  the  impedance  term  in  the  Leontovich  boundary 
condition,  and  the  complex  index  of  refraction  for  finite  conductivity,  vertical 
polarization,  and  rough  sea  surface  calculations.  These  formulas  follow  Kuttler  and 
Dockery  ‘s  method. 

3.1.1.14  Get  Angles  (GETANGLES)  SU 

The  GETANGLES  SU  computes  the  grazing  angles  at  each  PE  range  step  for 
subsequent  use  in  rough  sea  surface  calculations,  and  also  computes  the  propagation 
angles  within  the  PE  region  for  subsequent  output  via  the  APMSTEP  CSC  if  so  desired. 
Two  methods  are  used  to  compute  the  grazing  angle.  The  first  method  uses  ray  trace  by 
referencing  a  RGTRACE  SU  to  compute  grazing  angles.  The  second  is  done  by  spectral 
estimation  of  the  near-surface  PE  field.  The  near-surface  PE  field  is  computed  by 
performing  a  “PE  run”  for  a  smooth-surface,  perfect-conducting,  horizontal  polarization 
case  at  a  fixed  frequency  (10  GHz)  and  fixed  PE  maximum  calculation  angle  (4°). 

3.1.1.15  Get  Maximum  Angle  (GETTHMAX)  SU 

The  GETTHMAX  SU  performs  an  iterative  ray  trace  to  determine  the  minimum 
angle  required  (based  on  the  reflected  ray)  in  obtaining  a  PE  solution.  The  detennination 
of  this  angle  will  depend  on  the  particular  mode  of  execution.  For  the  full  and  partial 
hybrid  modes,  a  ray  is  traced  up  to  a  height  that  exceeds  at  least  20%  above  the 
maximum  terrain  peak  along  the  path  or  the  highest  trapping  layer  specified  in  the 
environment  profiles,  whichever  is  greater.  The  maximum  PE  propagation  angle  is  then 
determined  from  the  local  maximum  angle  of  the  traced  ray. 
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3.1.1.16  Grazing  Angle  Interpolation  (GRAZEJNT)  SU 

The  GRAZEINT  SU  interpolates  grazing  angles  at  each  PE  range  step  based  on 
angles  computed  from  ray  trace  (takes  precedence)  and  those  computed  from  spectral 
estimation.  These  are  used  for  subsequent  rough  surface  calculations. 

3.1.1.17  Height  Check  (HTCHECK)  SU 

The  HTCHECK  SU  determines  if  the  current  traced  height  is  below  the  current 
ground  height.  If  so,  it  will  calculate  the  reflection  point  and  return  with  the  modified 
angle,  range,  and  height  of  reflection. 

3.1.1.18  Interpolate  Profile  (INTPROF)  SU 

The  INTPROF  SU  performs  a  linear  interpolation  vertically  with  height  on  the 
refractivity  profile.  Interpolation  is  perfonned  at  each  PE  mesh  height  point. 

3.1.1.19  PE  Initialization  (PEINIT)  SU 

The  PEINIT  SU  initializes  all  variables  used  in  the  PE  model  for  subsequent  calls 
to  the  PESTEP  SU.  The  PE  calculation  height  mesh  and  range  step  size  are  determined. 
The  free-space  propagator  term  is  computed  at  each  PE  angle,  or  p-space,  mesh  point 
using  the  wide-angle  propagator.  A  filter,  or  attenuation  function  (frequently  called 
“window”),  is  applied  to  the  upper  one-quarter  of  the  array  corresponding  to  the  highest 
one-quarter  of  the  maximum  propagation  angle.  Next,  the  environmental  phase  term  is 
computed  at  each  PE  height,  or  z-space,  mesh  point  (if  performing  a  smooth  surface, 
refractive  homogeneous  case).  A  filter,  or  attenuation  function  (frequently  called 
“window”),  is  applied  to  the  upper  one-quarter  of  the  mesh  points  corresponding  to  the 
highest  one-quarter  of  the  calculation  height  domain.  Finally,  a  XYINIT  SU  is 
referenced  to  initialize  the  PE  starting  field. 

3.1.1.20  Poly  4  (FN_POLY4)  Function 

The  FN  POLY4  function  evaluates  a  fourth  degree  polynomial. 

3.1.1.21  Poly  5  (FN_POLY5)  Function 

The  FN  POLY5  function  evaluates  a  fifth  degree  polynomial. 

3.1.1.22  Profile  Reference  (PROFREF)  SU 

The  PROFREF  SU  adjusts  the  current  refractivity  profile  so  that  it  is  relative  to  a 
reference  height.  The  reference  height  is  initially  the  minimum  height  of  the  terrain 
profile.  Upon  subsequent  calls  from  the  PESTEP  SU,  the  refractivity  profile  is  adjusted 
by  the  local  ground  height  at  each  PE  range  step. 

3.1.1.23  Refractivity  Initialization  (REFINIT)  SU 

The  REFINIT  SU  checks  for  valid  environmental  profile  inputs  and  initializes  all 
refractivity  arrays. 
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The  environmental  data  are  checked  for  a  range-dependent  profile  and  tested  to 
determine  if  the  range  of  the  last  profile  entered  is  less  than  the  maximum  output  range 
specified.  If  so,  an  integer  error  flag  is  returned  and  the  SU  exited,  depending  on  the 
values  of  logical  error  flags  set  in  the  external  calling  CSCI  itself. 

The  REFINIT  SU  also  tests  for  valid  refractivity  level  entries  for  each  profile.  If 
the  last  gradient  in  any  profile  is  negative,  it  returns  an  integer  error  flag  and  the  SU  is 
exited.  If  no  errors  are  detected,  the  REFINIT  SU  then  extrapolates  the  environmental 
profiles  vertically  to  1000  km  in  height.  Extrapolation  is  not  performed  horizontally 
from  the  last  provided  profile;  rather,  the  last  provided  environment  profile  is  duplicated 
at 

107  km  in  range.  This  duplication  of  profiles  is  performed  by  the  REFINTER  SU. 
Finally,  the  REFINIT  SU  checks  if  an  evaporation  duct  profile  has  been  specified. 

3.1.1.24  Remove  Duplicate  Refractivity  Levels  (REMDUP)  SU 

The  REMDUP  SU  removes  any  duplicate  refractivity  levels  in  the  currently 
interpolated  profile. 

3.1.1.25  RG  Trace  (RGTRACE)  SU 

The  RGTRACE  SU  performs  ray  traces  of  many  rays  launched  within  an  angle  of 
±4°.  All  angles  from  rays  striking  the  surface  are  then  sorted  and  stored  for  subsequent 
interpolation  in  the  GRAZE  INT  SU. 

3.1.1.26  Terrain  Initialization  (TERINIT)  SU 

The  TERINIT  SU  examines  and  initializes  terrain  arrays  for  subsequent  use  in  PE 
calculations.  It  tests  for  and  determines  a  range  increment  if  it  is  found  that  range/height 
points  are  provided  in  fixed  range  increments.  The  minimum  terrain  height  is  determined 
and  the  entire  terrain  profile  is  adjusted  so  all  internal  calculations  are  referenced  to  this 
height.  This  is  done  in  order  to  minimize  the  PE  transform  calculation  volume. 

3.1.1.27  Trace  to  Output  Range  (TRACE_ROUT)  SU 

The  TRACE  ROUT  SU  traces  a  single  ray,  whose  launch  angle  is  specified  by 
the  calling  routine,  to  each  output  range.  The  height  of  this  ray  is  stored  at  each  output 
range  for  subsequent  proper  indexing  and  accessing  of  the  appropriate  sub-models. 

3.1.1.28  Trace  to  next  Step  (TRACE_STEP)  SU 

The  TRACE  STEP  SU  performs  one  ray  trace  step  for  a  given  starting  angle, 
range,  and  height.  When  passed  a  starting  angle,  range,  and  height  for  a  single  ray,  it  will 
trace  to  the  first  boundary  that  occurs,  whether  that  is  a  refractivity  level  or  the  surface. 
It  then  passes  back  the  ending  angle,  range  and  height  and  a  flag  indicating  if  the  ray  has 
hit  the  surface. 
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3.1.1.29  Troposcatter  Initialization  (TROPOINIT)  SU 

The  TROPOINIT  SU  initializes  all  variables  and  arrays  needed  for  subsequent 
troposcatter  calculations.  The  tangent  range  and  tangent  angle  are  determined  from  the 
source  and  from  all  receiver  heights  and  stored  in  arrays. 

3.1.1.30  Starter  Field  Initialization  (XYINIT)  SU 

The  XYINIT  SU  calculates  the  complex  PE  solution  at  range  zero. 

Several  constant  terms  that  will  be  employed  over  the  entire  PE  mesh  are 
calculated.  These  terms  are  the  angle  difference  between  mesh  points  in  p-space  and  a 
height-gain  value  at  the  source  (transmitter). 

For  each  point  in  the  PE  p-space  mesh,  the  antenna  pattern  ANTPAT  SU  is 
referenced  to  obtain  an  antenna  pattern  factor  for  a  direct-path  ray  and  a  surface-reflected 
ray.  The  complex  portions  of  the  PE  solution  are  then  determined  from  the  antenna 
pattern  factors,  elevation  angle,  and  antenna  height.  The  initial  field  assumes  the  source 
is  over  a  perfectly  conducting  ground. 

3.1.2  Advanced  Propagation  Model  Step  (APMSTEP)  CSC 

The  APMSTEP  CSC  advances  the  entire  APM  CSCI  algorithm  one  output  range 
step,  referencing  various  SUs  to  calculate  the  propagation  loss  at  the  current  output 
range.  At  this  current  range,  APM  calculations  will  be  made  within  the  vertical  (up  to  the 
maximum  PE  height  region)  by  accessing  the  appropriate  region’s  SUs. 

The  current  output  range  is  determined.  The  PESTEP  SU  is  referenced  to  obtain 
the  PE  portion  of  the  propagation  loss  at  this  new  range. 

For  an  airborne  application,  the  FEDR  SU  is  referenced  to  obtain  the  FE  portion 
of  the  propagation  loss  above  and  below  the  PE  maximum  propagation  angle. 

If  running  in  full  hybrid  mode,  then  based  upon  a  height  array  index  used  within 
the  FE  region,  a  determination  is  made  for  the  necessity  to  include  FE  propagation 
calculations.  If  so,  the  FEM  SU  is  referenced  to  obtain  the  FE  portion  of  the  propagation 
loss.  If  a  FE  calculation  is  made,  the  maximum  height  index  for  the  RO  region  is 
adjusted  (with  the  minimum  height  index  corresponding  to  the  maximum  height  index  of 
the  PE  region),  and  the  ROLOSS  SU  is  referenced  to  obtain  the  RO  portion  of  the 
propagation  loss  at  the  current  range.  FE  and  RO  propagation  loss  will  be  computed  only 
up  to  the  range  at  which  XO  calculations  will  be  perfonned. 

If  running  in  a  partial  hybrid  (PE  +  XO)  mode,  then  only  the  PESTEP  SU  will  be 
referenced  to  obtain  the  PE  portion  of  the  propagation  loss  at  this  new  range. 
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Finally,  absorption  loss  is  computed  for  the  current  range  and  added  to  the 
propagation  loss  at  all  heights. 

3. 1.2.1  Calculate  Propagation  Loss  (CALCLOS)  SU 

The  CALCLOS  SU  determines  the  propagation  loss  from  the  complex  PE  field  at 
each  output  height  point  at  the  current  output  range. 

The  local  ground  height  at  the  current  output  range  is  detennined.  All 
propagation  loss/factor  values  at  output  height  points  up  to  the  local  ground  height  are 
then  set  to 

-32766.  The  first  valid  loss  point  is  determined  corresponding  to  the  first  output  height 
point  above  the  ground  height.  Next,  the  last  valid  loss  point  is  determined  based  on  the 
smaller  of  the  maximum  output  height  or  the  height  traced  along  the  maximum  PE 
propagation  angle  to  the  current  output  range. 

From  the  height  of  the  first  valid  loss  point  to  the  height  of  the  last  valid  loss 
point,  the  GETPFAC  SU  is  referenced  to  obtain  the  propagation  factor  in  dB  (field 
strength  relative  to  free  space)  at  all  corresponding  output  heights  at  the  previous  and 
current  PE  ranges.  Then,  for  each  valid  output  height,  horizontal  interpolation  in  range  is 
performed  to  obtain  the  propagation  factor  at  the  current  output  range.  From  the 
propagation  factor  and  the  free-space  loss,  the  propagation  loss  at  each  valid  output 
height  is  detennined,  with  the  propagation  loss/factor  set  to  -32767  for  all  output  height 
points  above  the  last  valid  output  height  but  less  than  the  maximum  output  height. 

If  running  in  full  or  partial  hybrid  modes,  the  propagation  factor  at  the  top  of  the 
PE  region  is  determined  at  every  output  range  and  stored  in  an  array  for  future  reference 
in  XO  calculations.  If  troposcatter  calculations  are  desired,  the  TROPOSCAT  SU  is 
referenced  with  the  results  added  to  the  propagation  loss/factor  array.  Absorption  loss  is 
computed  for  the  current  range  and  added  to  the  propagation  loss  at  all  heights.  All 
loss/factor  values  returned  to  the  external  CSCI  at  this  point  are  in  centibels 
(10  cB  =  1  dB). 

3.1. 2.2  Current  Wind  (FN_CURWIND)  Function 

The  FNCURWIND  function  performs  a  linear  interpolation  in  range  to  get  the 
current  wind  speed  at  the  specified  range. 

3. 1.2. 3  Dielectric  Constant  (FN_DIECON)  Function 

The  FN  DIECON  function  extracts  the  complex  dielectric  constant  at  a  particular 

range. 

3.1. 2.4  DoShiftSU 

The  DOSHIFT  SU  shifts  the  complex  PE  field  by  the  number  of  bins,  or  PE  mesh 
heights  corresponding  to  the  local  ground  height. 
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Upon  entering  the  number  of  bins  to  be  shifted  are  determined.  The  PE  solution 
is  then  shifted  downward  if  the  local  ground  is  currently  at  a  positive  slope,  and  upward 
if  the  local  ground  is  at  a  negative  slope. 

3. 1.2. 5  Discrete  Sine/Cosine  Fast-Fourier  Transform  (DRST)  SU 

A  function  with  a  common  period,  such  as  a  solution  to  the  wave  equation,  may 
be  represented  by  a  series  consisting  of  sines  and  cosines.  This  representation  is  known 
as  a  Fourier  series.  An  analytical  transformation  of  this  function,  known  as  a  Fourier 
transfonn,  may  be  used  to  obtain  a  solution  for  the  function. 

The  solution  to  the  PE  approximation  to  Maxwell’s  wave  equation  is  to  be 
obtained  by  using  such  a  Fourier  transformation  function.  The  APM  CSCI  requires  the 
real-valued  sine  and  cosine  transformations  in  which  the  real  and  imaginary  parts  of  the 
PE  equation  are  transformed  separately.  A  Fourier  transformation  for  possible  use  with 
the  APM  CSCI  is  described  by  Bergland  (1969)  and  Cooley,  Fewis,  and  Welsh  (1970). 

3.1. 2.6  Flat-Earth  Direct  Ray  (FEDR)  SU 

The  FEDR  SU  determines  propagation  loss  based  on  FE  calculations  for  the 
direct  ray  path  only  for  regions  above  and  below  the  PE  maximum  propagation  angle. 

3.1. 2.7  Flat-Earth  Model  (FEM)  SU 

The  FEM  SU  computes  propagation  loss  at  a  specified  range  based  upon  FE 
approximations.  Receiver  heights  are  corrected  for  earth  curvature  and  average 
refraction  based  on  twice  the  effective  earth  radius  computed  in  the  GET  K  SU.  The 
following  steps  are  perfonned  for  each  APM  output  height. 

1.  The  path  lengths  and  elevation  angles  for  the  direct-path  and  surface-reflected  path, 
along  with  the  grazing  angle,  are  computed  from  simple  right-triangle  calculations. 
Using  the  two  elevation  angles,  the  ANTPAT  SU  is  referenced  to  obtain  an  antenna 
pattern  factor  for  each  angle.  Using  the  grazing  angle,  the  GETREFCOEF  SU  is 
referenced  to  obtain  the  magnitude  and  phase  lag  of  the  surface  reflection  coefficient. 

2.  From  the  path  length  difference,  the  phase  lag  of  the  surface  reflected  ray,  and  the 
wave  number,  a  total  phase  lag  is  determined.  Using  the  total  phase  lag,  the 
magnitude  of  the  surface  reflection  coefficient  and  the  two  antenna  pattern  factors, 
the  two  ray  components  are  coherently  summed  to  obtain  a  propagation  factor.  The 
propagation  factor,  together  with  the  free-space  propagation  loss  and  path  length 
difference  of  the  direct-path  ray,  are  used  to  compute  the  propagation  loss. 

3. 1.2. 8  Fast-Fourier  Transform  (FFT)  SU 

The  FFT  SU  separates  the  real  and  imaginary  components  of  the  complex  PE 
field  into  two  real  arrays  and  then  reference  the  DRST  SU  that  transforms  each  portion  of 
the  PE  solution. 
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3. 1.2. 9  Free  Space  Range  Step  (FRSTP)  SU 

The  FRSTP  SU  propagates  the  complex  PE  solution  field  in  free  space  by  one 
range  step. 

The  PE  field  is  transformed  to  p-space  and  then  multiplied  by  the  free-space 
propagator.  Before  exiting,  the  PE  field  is  transformed  back  to  z-space.  Both  transforms 
are  perfonned  using  a  FFT  SU. 

3.1.2.10  FZLIM  SU 

The  FZLIM  SU  determines  the  propagation  factor  (in  dB)  and  the  outgoing 
propagation  angle  at  the  top  of  the  PE  calculation  region.  These  values,  along  with  the 
corresponding  PE  range,  are  stored  for  future  reference  by  the  XOINIT  SU. 

The  GETPFAC  SU  is  referenced  to  determine  the  propagation  factor  at  the  last 
height  mesh  point  in  the  valid  part  of  the  PE  region.  The  propagation  factor,  along  with 
the  range  and  the  local  ray  angle  (determined  from  the  ray  traced  separating  the  RO  and 
PE  regions),  is  stored  if  this  is  the  first  call  to  the  FZLIM  SU.  The  SPECEST  SU  is  then 
referenced  to  detennine  the  outgoing  propagation  angle.  Depending  on  the  change  of 
angles  from  one  range  step  to  the  next,  the  calculated  outgoing  angle  will  be  limited.  The 
storage  array  counter  is  incremented  and  the  outgoing  angle  stored. 

Before  exiting,  the  SAVEPRO  SU  is  referenced  to  store  the  refractivity  profiles 
from  the  top  of  the  PE  region  to  the  maximum  specified  coverage  height. 

3.1.2.11  Get  Propagation  Factor  (FN_GETPFAC)  Function 

The  FN  GETPFAC  function  determines  the  propagation  factor  at  the  specified 
height  in  decibels. 

A  vertical  interpolation  with  height  on  the  PE  solution  field  is  performed  to  obtain 
the  magnitude  of  the  field  at  the  desired  output  height  point.  An  additional  calculation  is 
made  and  the  propagation  factor  is  then  returned  in  decibels. 

3.1.2.12  Get  Reflection  Coefficient  (GETREFCOEF)  SU 

The  GETREFCOEF  SU  calculates  the  complex  surface  reflection  coefficient, 
along  with  the  magnitude  and  phase  angle. 

The  complex  reflection  coefficient  is  computed  from  a  specified  grazing  angle 
and  is  based  on  the  Fresnel  reflection  coefficient  equations  for  vertical  and  horizontal 
polarization.  The  magnitude  and  phase  angle  are  determined  from  the  complex  reflection 
coefficient.  If  rough  surface  calculations  are  required,  the  smooth  surface  reflection 
coefficient  is  then  modified  by  the  Miller-Brown  rough  surface  reduction  factor,  which  is 
a  function  of  wind  speed  and  grazing  angle. 
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3.1.2.13  Get  Troposcatter  Loss  (FN_GET_TLOSS)  Function 

The  FNGETTLOSS  function  determines  the  loss  due  to  troposcatter  and 
computes  the  appropriate  loss  from  troposcatter  and  diffraction  for  a  specific  transmitter 
and  receiver  point  over  land  and  water.  For  each  transmitter/receiver  pair,  the  following 
steps  are  perfonned. 

1.  If  the  current  output  range  is  less  than  the  minimum  diffraction  field  range  for  a 
particular  receiver  height,  then  the  SU  is  exited  and  no  troposcatter  loss  is  computed. 

2.  The  tangent  angle  from  the  receiver  height  is  determined. 

3.  The  common  volume  scattering  angle  is  determined  and  calculations  are  performed  to 
obtain  the  loss  due  to  troposcatter. 

Troposcatter  loss  is  compared  to  propagation  loss.  If  the  difference  between  the 
propagation  loss  and  troposcatter  loss  is  less  than  18  dB,  then  the  corresponding  power 
levels  of  the  two  loss  values  are  added.  If  the  difference  is  greater  than  18  dB,  then  the 
lesser  of  the  two  losses  is  used. 

3.1.2.14  Linear  Interpolation  (FN_PLINT)  Function 

The  FN  PLINT  function  performs  a  linear  interpolation  on  two  input  parameters 
passed  to  the  function. 

3.1.2.15  Mixed  Fourier  Transform  (MIXEDFT)  SU 

The  MIXEDFT  SU  propagates  the  PE  field  in  free  space  one  PE  range  step, 
applying  the  Leontovich  boundary  condition,  using  the  mixed  Fourier  transform  as 
outlined  by  Kuttler  and  Dockery  (1991).  For  finite  conducting  boundaries  (i.e.,  if  vertical 
polarization  is  specified  or  rough  surface  calculations  are  required)  and  the  frequency  is 
less  than  400  MHz,  the  central  difference  form  of  the  DMFT  is  used.  If  the  frequency  is 
greater  than  400  MHz,  the  backward  difference  fonn  of  the  DMFT  is  used. 

3.1.2.16  Parabolic  Equation  Step  (PESTEP)  SU 

The  PESTEP  SU  advances  the  PE  solution  one  output  range  step,  referencing 
various  SUs  to  calculate  the  propagation  loss  at  the  current  output  range. 

The  next  output  range  is  detennined  and  an  iterative  loop  begun  to  advance  the 
PE  solution  such  that  for  the  current  PE  range,  a  PE  solution  is  calculated  from  the 
solution  at  the  previous  PE  range.  This  procedure  is  repeated  until  the  output  range  is 
reached. 

At  each  PE  range  step,  the  local  ground  height  is  determined  and  the  PE  field  is 
“shifted”  by  the  number  of  bins  or  PE  mesh  height  points  corresponding  to  the  local 
ground  height.  This  is  perfonned  in  the  DOSHIFT  SU. 
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If  the  APM  CSCI  is  used  in  a  range-dependent  mode,  that  is,  more  than  one 
profile  has  been  input;  or  a  terrain  profile  is  specified,  the  REFINTER  SU  is  referenced 
to  compute  a  new  modified  refractive  index  profile  adjusted  by  the  local  ground  height  at 
the  current  range.  A  new  environmental  phase  term  is  computed  using  this  new 
refractivity  profile. 

If  using  vertical  polarization  and  the  current  ground  type  has  changed  from  the 
previous  one,  or  rough  surface  calculations  are  required,  a  GETALN  SU  is  referenced  to 
determine  the  impedance  tenn  and  all  associated  variables  used  for  the  mixed  transform 
calculations. 

If  rough  surface  calculations  are  required,  or  if  using  vertical  polarization,  then  a 
MIXEDFT  SU  is  referenced,  otherwise,  a  FRSTP  SU  is  referenced  to  advance  the  PE 
solution  one  range  step  in  free  space.  The  environmental  phase  tenn  is  then  applied  to 
obtain  the  new  final  PE  solution  at  the  current  range.  Once  all  calculations  are  made  to 
determine  the  PE  field  at  the  current  PE  range,  the  FZLIM  SU  is  referenced  to  detennine 
and  store  the  outgoing  propagation  factor  and  propagation  angle  at  the  top  of  the  PE 
region.  The  FZLIM  SU  is  only  referenced  if  running  in  full  or  partial  hybrid  modes. 
Finally,  a  CALCLOS  SU  is  referenced  to  obtain  the  propagation  loss/factor  at  the  desired 
output  heights  at  the  current  output  range. 

3.1.2.17  Ray  Trace  (RAYTRACE)  SU 

Using  standard  ray  trace  techniques,  a  ray  is  traced  from  a  starting  height  and 
range  with  a  specified  starting  elevation  angle  to  a  termination  range.  As  the  ray  is  being 
traced,  an  optical  path  length  difference  and  a  derivative  of  range  with  respect  to 
elevation  angle  are  being  continuously  computed.  If  the  ray  should  reflect  from  the 
surface,  a  grazing  angle  is  determined.  Upon  reaching  the  termination  range,  a  tenninal 
elevation  angle  is  determined  along  with  a  termination  height. 

3.1.2.18  Refractivity  Interpolation  (REFINTER)  SU 

The  REFINTER  SU  interpolates  horizontally  and  vertically  on  the  modified 
refractivity  profiles.  Profiles  are  then  adjusted  so  they  are  relative  to  the  local  ground 
height. 


If  range-dependent  refractive  profiles  have  been  specified,  horizontal 
interpolation  to  the  current  PE  range  is  performed  between  the  two  neighboring  profiles. 
A  REMDUP  SU  is  referenced  to  remove  duplicate  refractivity  levels,  and  the  PROFREF 
SU  is  then  referenced  to  adjust  the  new  profile  relative  to  the  internal  reference  height 
corresponding  to  the  minimum  height  of  the  terrain  profile.  The  PROFREF  SU  is 
referenced  once  more  to  adjust  the  profile  relative  to  the  local  ground  height,  and  upon 
exit  from  the  PROFREF  SU,  the  INTPROF  SU  is  referenced  to  interpolate  vertically  on 
the  refractivity  profile  at  each  PE  mesh  height  point. 
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3.1.2.19  Ray  Optics  Calculation  (ROCALC  SU) 

The  ROCALC  SU  computes  the  RO  components  needed  in  the  calculation  of 
propagation  loss  at  a  specified  range  and  height  within  the  RO  region.  These  components 
are  the  amplitudes  for  a  direct-path  and  surface-reflected  ray,  and  the  total  phase  lag 
angle  between  the  direct-path  and  surface-reflected  rays. 

A  test  is  made  to  determine  if  this  is  the  first  RO  calculation.  If  an  initial 
calculation  is  needed,  the  height,  range,  and  elevation  angle  array  indices  are  set  to  initial 
conditions.  If  not,  the  array  indices  are  incremented  from  the  previous  RO  calculation. 

The  following  steps  are  performed  for  each  series  of  vertical  grid  points,  in  a 
manner  that  ensures  that  RO  calculations  have  been  performed  at  ranges  that  span  the 
current  range  of  interest.  The  vertical  grid  points  are  taken  in  order,  beginning  with  the 
one  with  the  greatest  height. 

1.  Using  a  Newton  iteration  method  with  a  varying  elevation  angle,  the  RAYTRACE 
SU  is  referenced  to  find  a  direct-path  ray  and  a  surface-reflected  ray  originating  at  the 
transmitter  height  and  terminating  at  the  same  grid  point.  Should  a  direct  or  reflected 
ray  not  be  found  to  satisfy  the  condition,  or  should  the  computed  grazing  angle 
exceed  the  grazing  angle  limit,  the  height  array  index  is  adjusted  to  redefine  the  lower 
boundary  of  the  RO  region.  Should  the  ray  trace  conditions  be  satisfied,  the 
RAYTRACE  SU  will  provide  a  terminal  elevation  angle,  a  derivative  of  range  with 
respect  to  elevation  angle,  a  path  length,  and  for  the  surface-reflected  ray,  a  grazing 
angle. 

2.  Using  the  final  direct-path  ray  and  surface-reflected  ray  elevation  angles  obtained 
from  the  Newton  iteration  method,  the  ANTPAT  SU  is  referenced  to  obtain  an 
antenna  pattern  factor  for  each  angle.  The  GETREFCOEF  SU  is  referenced  to  obtain 
the  amplitude  and  phase  lag  angle  of  the  surface  reflection  coefficient. 

3.  Using  the  antenna  pattern  factors,  path  length  differences,  and  surface-reflection 
coefficients,  the  necessary  RO  components  defined  in  the  first  paragraph  above  are 
calculated. 

3.1.2.20  Ray  Optics  Loss  (ROLOSS)  SU 

The  ROLOSS  SU  calculates  propagation  factor  and  loss  values  at  all  valid  RO 
heights  at  a  specified  range  based  based  upon  the  components  of  magnitude  for  a  direct- 
path  and  surface-reflected  ray  and  the  total  phase  lag  angle  between  the  two  rays  as 
detennined  by  the  ROCALC  SU. 

For  purposes  of  computational  efficiency,  an  interpolation  from  the  magnitude 
and  total  phase  lag  arrays,  established  by  the  ROCALC  SU,  is  made  to  obtain  these  three 
quantities  at  each  APM  vertical  output  mesh  point  within  the  RO  region. 
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From  the  interpolated  phase  lag  and  ray  amplitudes,  a  propagation  factor  is 
calculated  that  is  used,  in  turn,  with  the  free-space  loss  to  obtain  a  propagation  loss  at 
each  vertical  APM  output  point.  Absorption  loss  is  computed  for  the  current  range  and 
added  to  the  propagation  loss  at  all  heights. 

3.1.2.21  Save  Profile  (SAVEPRO)  SU 

The  SAVEPRO  SU  stores  refractivity  profiles  at  each  PE  range  step  from  the  top 
of  the  PE  region  to  the  maximum  user-specified  height.  This  is  only  done  if  running  in 
full  or  partial  hybrid  modes. 

The  refractivity  height  level  just  exceeding  the  PE  region  height  limit  is 
determined.  From  this  level  upward,  all  heights,  M-units,  and  gradients  are  stored. 

3.1.2.22  Spectral  Estimation  (SPECEST)  SU 

The  SPECEST  SU  determines  the  outward  propagation  angle  at  the  top  of  the  PE 
calculation  region  or  the  grazing  angle  at  the  lower  part  of  the  PE  region  based  on 
spectral  estimation.  The  outward  propagation  angle  is  used  for  XO  calculations  and  the 
grazing  angle  is  used  for  rough  surface  calculations. 

The  upper  8  (if  running  smooth  surface  case)  or  16  (if  running  terrain  case)  bins 
of  the  complex  PE  field  at  the  current  PE  range  are  separated  into  their  real  and 
imaginary  components.  The  upper  Vi  of  this  portion  of  the  field  is  then  filtered  and  zero- 
padded  to  256  points.  It  is  then  transformed  to  its  spectral  components  via  a  reference  to 
the  DRST  SU.  The  amplitudes  of  the  spectral  field  are  then  determined  and  a  3-point 
average  is  perfonned.  The  peak  of  the  256-point  field  is  found  and  the  outgoing 
propagation  angle  is  detennined  from  the  peak  value. 

3.1.2.23  Surface  Impedance  (SURFIMP)  SU 

The  SURFIMP  SU  computes  the  nonnalized  average  surface  impedance  for 
surface  wave  propagation  by  vertically  polarized  waves  along  the  sea  surface.  This  is 
done  for  frequencies  less  than  50  MHz. 

3.1.2.24  Troposcatter  (TROPOSCAT)  SU 

The  TROPOSCAT  SU  determines  the  loss  due  to  troposcatter  and  to  compute  the 
appropriate  loss  from  troposcatter  and  propagation  loss  for  large  receiver  ranges. 

The  current  output  range  is  updated  and  the  tangent  angle  from  the  source  to  the 
current  output  range  is  initialized.  For  all  output  receiver  heights  at  the  current  output 
range,  the  following  procedure  is  performed. 

3.1.3  Extended  Optics  Initialization  (XOINIT)  CSC 

The  XOINIT  SU  initializes  the  range,  height,  and  angle  arrays  in  preparation  for 
the  XOSTEP  CSC. 
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Upon  entering,  if  XO  calculations  are  not  required,  the  APMCLEAN  SU  is 
referenced  to  deallocate  all  arrays  used  for  the  current  application,  then  the  CSC  is  exited. 

If  XO  calculations  are  required,  all  arrays  used  for  XO  calculations  are  allocated 
and  initialized  to  0.  The  ranges  and  angles  previously  stored  from  referencing  the 
FZLIM  SU  are  now  used  to  initialize  the  range  and  angle  arrays  for  XO  calculations.  A 
10-point  smoothing  average  on  the  angle  array  is  performed  twice  via  reference  to  the 
MEANFILT  SU.  Upon  exiting,  the  height  array  and  initial  height  index  for  start  of  XO 
calculations  are  initialized. 

3. 1.3.1  Advanced  Propagation  Model  Clean  (APMCLEAN)  SU 

The  APMCLEAN  CSC  deallocates  all  dynamically  dimensioned  arrays  used  in 
one  complete  run  of  APM  calculations. 

3.1. 3.2  Clutter-to-Noise  (CLUTTER)  SU 

The  CLUTTER  SU  computes  the  clutter-to-noise  ratio  in  dB  at  each  output  range 
based  on  the  radar  range  equation  over  land  or  water. 

The  clutter  is  computed  over  water  based  on  a  modification  to  the  Georgia 
Institute  of  Technology  (GIT)  reflectivity  model,  which  is  valid  for  frequencies  greater 
than  1  GHz. 

For  those  portions  of  the  path  over  land  the  reflectivity  is  determined  based  on  the 
“constant-gamma”  model,  where  a  parameter  describing  the  backscattering  effectiveness 
of  the  surface  must  be  provided. 

3. 1.3. 3  Diffraction  Loss  (FN_DLOSS)  Function 

The  FN  DLOSS  function  computes  loss  in  the  diffraction  region  based  on  the 
CCIR  model  for  standard  atmosphere. 

3.1. 3.4  Get  Theta  (GETTHETA)  SU 

The  GETTHETA  SU  calculates  the  optical  phase-lag  difference  angle  from  the 
reflection  range  found  in  the  R1ITER  SU. 

3.1. 3.5  GIT  Initialization  (GITJNIT)  SU 

The  GIT  INIT  SU  initializes  all  variables  used  in  the  calculation  of  the 
reflectivity  based  on  a  modified  version  of  the  GIT  model. 

3.1. 3.6  GofZ  (GOFZ)  Function 

The  GOFZ  function  calculates  the  diffraction  region  height-gain  in  dB  from  the 
CCIR  diffraction  region  model  for  standard  atmosphere. 
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3. 1.3. 7  Mean  Filter  (MEANFILT)  SU 

The  MEANFILT  SU  performs  an  n-point  average  smoothing  on  any  array  passed 

to  it. 

3. 1.3. 8  Optical  Region  Limit  (OPLIMIT)  SU 

The  OPLIMIT  SU  calculates  the  maximum  range  in  the  optical  interference 
region  and  the  corresponding  loss  at  that  range. 

3.1. 3.9  Optical  Difference  (OPTICF)  SU 

The  OPTICF  SU  calculates  the  optical  path-length  difference  angle  by  solving  a 
cubic  equation  for  the  reflection  point  range. 

3.1.3.10  R1  Iteration  (R1ITER)  SU 

The  R1ITER  SU  finds  the  range  of  the  reflection  point  corresponding  to  a 
particular  launch  angle. 

3.1.3.11  Standard  Propagation  Model  Initialization  (SPM_INIT)  SU 

The  SPM  INIT  SU  initializes  many  of  the  variables  used  throughout  the  SPM 
SU. 

3.1.3.12  Standard  Propagation  Model  (SPM)  SU 

The  SPM  SU  computes  the  propagation  factor  for  a  standard  atmosphere  only, 
with  the  assumption  of  omni-directional  antenna  patterns. 

3.1.4  Extended  Optics  Step  (XOSTEP)  CSC 

The  XOSTEP  CSC  advances  the  APM  CSCI  algorithm  one  output  range  step 
from  the  top  of  the  PE  calculation  region  to  the  maximum  output  height  specified, 
referencing  various  SUs  to  calculate  the  propagation  loss  and  factor  at  the  current  output 
range. 


Upon  entering  the  XOSTEP  CSC,  the  current  output  range  is  determined.  The 
EXTO  SU  is  referenced  to  obtain  the  XO  portion  of  the  propagation  loss  and  factor  at 
this  new  range. 

If  running  in  full  hybrid  mode,  based  on  a  height  array  index  used  within  the  FE 
region,  determine  if  it  is  necessary  to  include  FE  propagation  calculations.  If  necessary, 
the  FEM  SU  is  referenced  to  obtain  the  FE  portion  of  the  propagation  loss  and  factor.  If 
an  FE  calculation  is  made,  the  maximum  height  index  for  the  RO  region  is  adjusted  (with 
the  minimum  height  index  corresponding  to  the  maximum  height  index  of  the  PE  region), 
and  the  ROLOSS  SU  is  referenced  to  obtain  the  RO  portion  of  the  propagation  loss  and 
factor  at  the  current  range. 
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If  running  in  partial  hybrid  mode,  then  only  the  EXTO  SU  is  referenced  to  obtain 
the  XO  portion  of  the  propagation  loss  and  factor  at  this  new  range.  The  maximum 
height  will  correspond  to  the  maximum  user-specified  coverage  height. 

Finally,  the  APMCLEAN  SU  is  referenced  to  deallocate  all  allocated  arrays  used 
throughout  the  run. 

3.1. 4.1  Extended  Optics  (EXTO)  SU 

The  EXTO  SU  calculates  propagation  loss  and  factor,  based  on  extended  optics 
techniques,  at  the  current  output  range. 

Upon  entering,  array  indices  for  the  current  range,  height,  and  angle  arrays  are 
initialized.  A  ray  trace  is  then  performed  for  all  rays  from  the  last  output  range  to  the 
current  output  range.  The  current  heights  are  then  sorted,  along  with  their  corresponding 
propagation  factors.  The  propagation  loss  is  then  determined  at  each  output  receiver 
height  by  interpolation  on  the  terminal  heights  of  the  traced  rays. 

Upon  exiting,  a  reference  to  the  TROPOSCAT  SU  provides  any  troposcatter 
losses  and  is  added  to  the  loss  array.  Absorption  loss  is  also  added  to  the  propagation 
loss  at  all  heights. 

3.1.5  Return  Grazing  Angle  (RET_GRAZE)  CSC 

The  RET  GRAZE  CSC  interpolates  the  grazing  angle  to  every  output  range  step, 
and  if  necessary,  will  interpolate  the  propagation  angles  in  height  at  every  output  range. 

3.2  CSCI  EXTERNAL  INTERFACE  REQUIREMENTS 

The  APM  CSCI  is  accessed  through  the  APMINIT  CSC  by  a  subroutine  call  from 
the  external  CSCI,  which  should  provide,  as  global  data  elements,  the  values  specified  in 
Table  1  through  Table  4. 

The  APM  CSCI  external  data  elements,  i.e.,  those  data  that  must  be  provided  by 
the  calling  external  CSCI  prior  to  the  APM  CSCI  execution  may  be  divided  into  four 
classifications.  The  first  classification  is  external  data  related  to  the  atmospheric 
environment  (Table  1),  the  second  is  data  related  to  the  EM  system  (Table  2),  the  third  is 
data  related  to  the  implementation  of  the  APM  CSCI  by  the  external  CSCI  (Table  3),  and 
the  fourth  is  data  related  to  the  terrain  information  (Table  4).  Each  table  lists  the  type, 
units,  and  bounds  of  each  data  element.  Table  5  specifies  the  output  data  of  the  APM 
CSCI  model. 
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Table  1 .  APM  CSCI  environmental  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

refinsl 

Modified  refractivity  profile  (dynamically 
allocated)  array  referenced  to  mean  sea  level 

real 

M 

>0.0a 

hmsl 

Profile  height  (dynamically  allocated)  array 

real 

meters 

See  note  b 

ft  prof 

Number  of  refractivity  profiles 

integer 

N/A 

>  1 

Ivlp 

Number  of  profile  levels 

integer 

N/A 

>2 

rngprof 

Dynamically  allocated  array  of  ranges  to  each 
profile 

real 

meters 

>0.0 

(lbs  hum 

Surface  absolute  humidity 

real 

g/m3 

0  to  50c 

fair 

Surface  air  temperature 

real 

°C 

-20  to  40c 

Ya 

Surface  specific  attenuation 

real 

dB/km 

>0.0 

l  extra 

Extrapolation  flag  for  refractivity  profiles 
entered  in  combination  with  terrain  below 
mean  sea  level 

integer 

N/A 

0  or  1 

ftw 

Number  of  wind  speeds  and  corresponding 
ranges 

integer 

N/A 

>0.0 

rngwind 

Dynamically  allocated  array  of  ranges 
specified  for  each  wind  speed  in  wind(). 

real 

meters 

>0.0 

wind 

Dynamically  allocated  array  of  wind  speeds. 

real 

meters/ 

second 

0.0  to  20. 0d 

windjir 

Angle  between  antenna  boresight  and  upwind 
direction 

real 

degrees 

0.0  to  360.0 

aCouplets  of  height  and  modified  refractivity  associated  with  that  height  are  referred  to  within  this  document  as  a 
refractivity  profile. 

bAll  heights  in  the  refractivity  profile  must  be  steadily  increasing. 

cThe  CCIR  gaseous  absorption  model  implemented  within  APM  provides  a  ±15%  accuracy  for  absolute  humidity 
and  surface  air  temperature  within  these  bounds.  While  values  beyond  these  limits  are  allowed  within  APM, 
note  that  this  may  result  in  less  accurate  attenuation  rates  being  calculated. 
dThe  maximum  wind  speed  will  vary  depending  on  frequency.  For  frequencies  less  than  10  GHz,  the  maximum 
that  can  be  specified  is  20  m/s.  Above  10  GHz,  the  maximum  wind  speed  that  can  be  specified  will  decrease  to 
an  absolute  maximum  of  15  m/s  at  20  GHz  and  above. 
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Table  2.  APM  CSCI  external  EM  system  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

Mbw 

Antenna  vertical  beam  width 

real 

degree 

0.5  to  45 

Mo 

Antenna  elevation  angle 

real 

degree 

-10.0  to  10.0 

C\ut 

Logical  flag  used  to  indicate  if  surface  clutter 
calculations  are  desired. 

logical 

N/A 

‘.true.’  or  ‘.false.’ 

J MHz 

EM  system  frequency 

real 

MHz 

2.0  to  20,000. 0a 

Ipat 

Antenna  pattern 

1  =  Omnidirectional 

2  =  Gaussian 

3  =  Sine  (X)/X 

4  =  Cosecant-squared 

5  =  Generic  height-finder 

6  =  User-defined  height-finder 

7  =  User-defined  antenna  pattern 

8  =  Quarter-wave  dipole 

integer 

N/A 

1  to  8 

Ipol 

Antenna  polarization 

0  =  Horizontal 

1  =  Vertical 

integer 

N/A 

Oto  1 

G 

Gain  of  transmit/receive  antennas 

real 

dBi 

>  0.0 

antht 

Antenna  height  above  local  ground  at  range  0.0  m 

real 

meters 

>  1.5b 

hfan 

g 

Dynamically  allocated  user-defined  height-finder 
power  reduction  angle  array  (ipat=  6)  or  antenna 
pattern  angles  (ipat=l) 

real 

degree 

0.0  to  90.0  for  ipa,= 6 
-90.0  to  90.0  for 

i pat  ~i 

hffcic 

Dynamically  allocated  user-defined  power 
reduction  factor  array  (ipat=  6)  or  antenna  pattern 
factors  (ipa,=l) 

real 

N/A 

0.0  to  1.0 

Lsys 

Miscellaneous  system  losses 

real 

dB 

>  0.0 

@hbw 

Antenna  horizontal  beam  width 

real 

degree 

s 

0.5  to  45 

Wfacs 

Number  of  power  reduction  angles/factors  for 
user-defined  height  finder  antenna  pattern 

integer 

N/A 

1  to  10 

Nf 

Noise  figure 

real 

dB 

>  0.0 

P, 

Transmitter  peak  power 

real 

kW 

>  0.1 

r 

Pulse  length/width 

real 

psec 

>  0.1 

aThe  frequency  can  be  specified  greater  than  20  GHz;  however,  the  PEj/ag must  be  set  to  ‘.true.’  and 
care  must  be  taken  in  specifying  thmax  and  rmu/t. 

bThe  minimum  antenna  height  will  vary  depending  on  the  frequency  and  beamwidth  according  to  the 
formula: 


anth,  >  maximum  of 


1.5, 0.6 


f  MHz  Mbw  J 


where  ca  is  the  speed  of  light  x  10‘6  m/s  (299.79245). 
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Table  3.  APM  CSCI  external  implementation  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

h  mux 

Maximum  height  output  for  a  particular  application  of 
APM 

real 

meters 

>  100.03 

h  min 

Minimum  height  output  for  a  particular  application  of 
APM 

real 

meters 

>o.oa 

lang 

Propagation  angle  and  factor  output  flag 

‘.tme.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and 
factors 

logical 

N/A 

‘.true.’  or 
‘.false. ,b 

lerr6 

Logical  flag  to  allow  for  error  -6  to  be  bypassed 

logical 

N/A 

‘.true.’  or 
‘.false.’0 

lerrl2 

Logical  flag  to  allow  for  error  -12  to  be  bypassed 

logical 

N/A 

‘.true.’  or 
‘.false.’0 

Mrout 

Number  of  range  output  points  for  a  particular 
application  of  APM 

intege 

r 

N/A 

>1 

Mzout 

Number  of  height  output  points  for  a  particular 
application  of  APM 

intege 

r 

N/A 

>1 

Mzoutrtg 

Number  of  height  output  points  for  receiver  heights 
relative  to  the  local  ground  elevation. 

intege 

r 

N/A 

>0 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

logical 

N/A 

‘.true.’  or 

‘.false.’ 

max 

Maximum  range  output  for  a  particular  application  of 
APM 

real 

meters 

>  5000.0" 

V mult 

PE-range  step  multiplier 

real 

N/A 

>0.0° 

th 

1,1  max 

Visible  portion  of  PE  maximum  calculation  angle 

real 

degree 

s 

>  o.oc 

T 

J  ropo 

Logical  flag  to  include  troposcatter  calculations. 

intege 

r 

N/A 

‘.true.’  or 
‘.false.’ 

zout_rtg 

Dynamically  allocated  array  of  receiver  heights 
specified  relative  to  the  local  ground  height. 

real 

meters 

>0.0 

a 

Refer  to  section  7.2  for  a  complete  description. 

bThis  flag  should  not  be  enabled  when  any  portion  of  the  propagation  path  is  over  land. 

0 

Refer  to  section  4.3.4  for  a  complete  description. 
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Table  4.  APM  CSCI  external  terrain  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

terx 

Dynamically  allocated  terrain  profile  range  array 

real 

meters 

>0.0a 

tery 

Dynamically  allocated  terrain  profile  height  array 

real 

meters 

>o.oa 

yc 

Dynamically  allocated  array  of  constants  describing 
the  backscattering  effectiveness  of  the  surface 

real 

dB 

-100.0  <  yc 
<  100.0 

yrng 

Dynamically  allocated  array  of  ranges  corresponding 
to  the  values  in  yc 

real 

meters 

>0.0 

Igc 

Number  of  yc  values  for  a  particular  application  of 
APM 

intege 

r 

N/A 

>0 

hp 

Number  of  terrain  profile  points  for  a  particular 
application  of  APM 

intege 

r 

N/A 

>2 

lgr 

Number  of  ground  types  for  a  particular  application 
of  APM 

intege 

r 

N/A 

>oa 

igrnd 

Array  of  ground  composition  types  for  a  particular 
application  of  APM 

0  =  Sea  water 

1  =  Fresh  water 

2  =  Wet  ground 

3  =  Medium  dry  ground 

4  =  Very  dry  ground 

5  =  Ice  at  -1°  C 

6  =  Ice  at -10°  C 

7  =  User-defined 

intege 

r 

N/OA 

0  <  igrnd  < 

7a 

rgrnd 

Dynamically  allocated  array  of  ranges  for  which 
ground  types  are  applied  for  a  particular  application 
of  APM 

real 

meters 

>0.0a 

dielec 

Dynamically  allocated  two-dimensional  array  of 
relative  permittivity  (s,.)  and  conductivity  (a)  for  a 
particular  application  of  APM 

real 

Sr -N/A 

CT- 

Siemens/ 

meter 

>oa 

“refer  to  section  7.3  for  a  complete  description 
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Table  5.  APM  CSCI  output  data  element  requirements. 


Name 

Description 

Type 

Units 

Source 

CNR 

Clutter-to-Noise  ratio  array 

real 

dB 

XOINIT  CSC 

w 

J  rout 

Array  of  grazing  angles  at  each  output  range 

r out 

real 

radians 

RETGRAZE  SU 

terror 

Integer  value  that  is  returned  if  an  error 
occurs  in  called  routine 

integer 

N/A 

APMINIT  CSC 

RET  GRAZE  SU 
XOINIT  CSC 

t-xostp 

Index  of  output  range  step  at  which  XO 
model  is  to  be  applied 

integer 

N/A 

APMINIT  CSC 

J  end 

Output  height  index  at  which  valid 
propagation  loss  values  end 

integer 

N/A 

APMSTEP  CSC 

J  start 

Output  height  index  at  which  valid 
propagation  loss  values  begin 

integer 

N/A 

APMSTEP  CSC 

Jxend 

Output  height  index  at  which  valid  XO 
propagation  loss  values  end 

integer 

N/A 

XOSTEP  CSC 

Jxstart 

Output  height  index  at  which  valid  XO 
propagation  loss  values  begin 

integer 

N/A 

XOINIT  CSC 

l graze 

Logical  flag  indicating  if  grazing  angles 
were  computed  for  a  particular  application 
of  APM 

logical 

N/A 

APMINIT  CSC 

mpfl 

Propagation  loss  and  factor  array 

integer 

cB 

APMSTEP  CSC 
XOSTEP  CSC 

mpflrtg 

Propagation  loss  and  factor  at  receiver 
heights  specified  in  the  zout  rtg  array 

integer 

cB 

APMSTEP  CSC 

propaf 

Two-dimensional  array,  containing  the 
propagation  angles  and  factors  for  the  direct 
and  reflected  rays  (where  applicable)  for  all 
output  height/range  points 

real 

radians, dB 

APMSTEP  CSC 

XOSTEP  CSC 

f out 

Current  output  range 

real 

meters 

APMSTEP  CSC 
XOSTEP  CSC 

3.3  CSCI  INTERNAL  INTERFACE  REQUIREMENTS 

Section  3.1  shows  the  relationship  between  the  APM  CSCI  and  its  four  CSCs 
APMINIT,  APMSTEP,  XOINIT,  and  XOSTEP.  The  required  internal  interface  between 
these  four  CSCs  and  the  APM  CSCI  is  left  to  the  designer.  However,  Table  7  should  be 
used  as  a  guide  to  the  required  internal  interfaces  in  the  CSCI. 
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3.4  CSCI  INTERNAL  DATA  REQUIREMENTS 


The  APM  CSCI  takes  full  advantage  of  Fortran  95  features,  utilizing  allocatable 
arrays  for  all  internal  and  input  arrays.  The  external  CSCI  designer  must  correctly 
allocate  and  initialize  all  arrays  necessary  for  input  to  the  APM  CSCI. 

Due  to  the  computational  intensity  of  the  APM  CSCI,  it  may  not  be  necessary  or 
desirable  to  use  the  extreme  capability  of  the  APM  CSCI  for  all  applications.  The 
variables  nrout  and  nzout  refer  to  the  desired  number  of  range  and  height  output  points  for 
any  one  particular  application,  and  will  be  specified  when  the  APMINIT  CSC  is  called. 

One  of  the  parameters  returned  to  the  external  application  from  the  APMINIT 
CSC  is  i error,  which  allows  for  greater  flexibility  in  how  input  data  are  handled  within  the 
external  application. 


Table  6  lists  all  possible  errors  that  can  be  returned. 


Table  6.  APMINIT  SU  returned  error  definitions. 


Definition 


Frequency  input  must  be  greater  than  or  equal  to  2  MFlz. 

Last  range  in  terrain  profile  is  less  than  rmax.  Will  only  return  this  error  if  lerr6  set  to 
‘.true.’. 


-7 

-8 

-9 

-10 

-11 

-12 

-13 

-14 

-17 

-18 

-21 

-22 

-23 

-24 


Specified  cut-back  angles  (for  user-defined  height  finder  antenna  pattern)  are  not 
increasing. 

hmax  is  less  than  maximum  height  of  terrain  profile. 

Antenna  height  with  respect  to  mean  sea  level  is  greater  than  maximum  height  hmax. 
Beamwidth  is  less  than  or  equal  to  zero  for  directional  antenna  pattern. 

Number  of  antenna  pattern  or  power  reduction  factors  and  angles  is  less  than  or  equal 
to  1.  For  =  6,  rifacs  must  be  at  least  1;  for  ipat  =  7,  nfacs  must  be  at  least  2. 

Range  of  last  environment  profile  given  (for  range-dependent  case)  is  less  than  rmax. 
Will  only  return  this  error  if  lerrl2  set  to  ‘.true.’. 

Fleight  of  first  level  in  any  user-specified  refractivity  profile  is  greater  than  0.  First 
height  must  be  at  mean  sea  level  (0.0)  or  <  0.0  if  below  mean  sea  level. 

Last  gradient  in  any  environment  profile  is  negative. 

Range  points  of  terrain  profile  are  not  increasing. 

First  range  value  in  terrain  profile  is  not  0. 

Clutter  calculations  are  specified  but  no  transmitter  power  has  been  provided. 

Clutter  calculations  are  specified  but  no  pulse  length  has  been  provided. 

Clutter  calculations  are  specified,  but  no  horizontal  beamwidth  has  been  provided. 

Clutter  calculations  are  desired  over  terrain  or  for  frequencies  less  than  1  GFlz,  but  no 
yc  values  have  been  specified. 
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Table  6.  APMinit  SU  returned  error  definitions,  (continued) 


ierwr  Definition 

-25  Specified  only  the  PE  model  to  be  used  but  did  not  specify  maximum  propagation 
angle  i hmax. 


-26 


Clutter  calculations  are  specified  with  the  propagation  path  partly  or  entirely,  over 
water  but  did  not  specify  a  wind  speed. 


-41 


Transmitter  height  is  less  than  1.5  meters. 


-42 

-43 


-44 


-45 


Minimum  height  input  by  user,  hmi„,  is  greater  than  maximum  height,  hmax. 

Transform  size  is  greater  than  230. 

Combination  of  frequency  and  antenna  beamwidth  results  in  antenna  physically  below 
the  surface.  Increase  frequency  or  beamwidth  for  valid  combination. 

Wind  speed  specified  is  greater  than  the  maximum  allowed  for  the  specified 
frequency. 


Error  in  terrain  ray  trace  ( contact  the  APM  CSCI  developers  if  this  occurs ) 

*  WARNING*:  Antenna  height  with  respect  to  mean  sea  level  is  greater  than  the  last 
height  in  the  refractivity  profile  at  the  source. 


The  logical  variables  lerr6  and  lerrl2,  when  set  to  ‘.false.’,  allow  the  external 
application  to  bypass  their  associated  errors,  as  these  are  not  critical  to  the  operation  of 
the  APM  CSCI. 

The  APM  CSCI  provides  propagation  loss  and  propagation  factor  for  all  heights 
and  ranges  when  running  in  a  full  hybrid  mode.  When  running  in  a  partial  hybrid  mode, 
it  provides  propagation  loss  and  factor  for  all  heights,  but  not  necessarily  for  all  angles. 
Refer  to  Section  3.1  for  environmental  conditions  under  which  each  execution  mode  is 
automatically  selected. 

Absorption  by  atmospheric  gases  (oxygen  and  water  vapor)  may  be  important  to 
some  applications  of  the  APM  CSCI  and  is  controlled  by  specifying  a  non-zero  value  for 
the  absolute  humidity,  absimm,  and  the  surface  air  temperature,  tai,-,  or  likewise,  by 
specifying  a  non-zero  value  for  the  gaseous  absorption  attenuation  rate,  ya. 

A  particular  application  of  the  APM  CSCI  may  or  may  not  require  the 
consideration  of  troposcatter  effects  within  the  propagation  loss/factor  calculations.  For 
example,  a  radar  evaluation  most  likely  would  not  be  influenced  by  troposcatter;  while 
an  ESM  evaluation  would.  APM  has  the  feature  of  including  or  not  including  the 
troposcatter  calculation  by  setting  a  logical  flag  called  Tropo.  Setting  this  flag  to  ‘.false.’ 
would  omit  the  calculation.  Setting  this  flag  to  ‘.true.’  would  include  the  calculation. 
For  the  APM  CSCI  implementation  within  the  external  coverage  and  loss  diagram 
applications,  Tropo  must  be  set  to  ‘.true.’  so  as  to  include  the  calculation. 
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APM  also  has  the  added  capability  to  account  for  rough  sea  surface  effects. 
Specifying  a  wind  speed  and  a  corresponding  range  will  produce  forward  scatter  results 
based  on  the  Philips  ocean-wave  model  for  the  root-mean-squared  (rms)  wave  height  and 
the  Miller-Brown  reflection  coefficient  reduction  factor.  The  capability  also  exists  to 
allow  variable  wind  speeds  with  range. 

APM,  by  default,  will  run  in  an  “automatic”  mode  in  which,  depending  upon 
user-specified  inputs,  will  choose  the  appropriate  sub-models  to  use  for  a  particular 
application.  However,  by  setting  the  logical  flag  PEjiag  to  ‘.true.’  APM  will  be  forced  to 
use  only  the  PE  sub-model  for  a  particular  external  application.  By  default,  this  flag  is  set 
to  ‘.false.’.  If  this  flag  is  ‘.true.’  then  the  visible  portion  of  the  maximum  PE  propagation 
angle,  thmax  (i.e.,  the  maximum  propagation  angle  the  PE  algorithm  will  accommodate  in 
the  field  calculations),  and  the  parameter,  rmuit,  must  be  specified.  By  default,  rmuit  is 
equal  to  1 ;  however,  thmax  does  not  have  a  default  value  and  must  be  explicitly  defined. 
The  parameter  rmu/t  is  a  range  step  multiplier,  allowing  the  user  to  vary  the  PE  range  step 
from  the  default  calculated. 

Use  this  option  with  caution,  as  you  must  have  some  basic  knowledge  of  PE 
algorithms  and  how  they  work  to  input  proper  combinations  of  maximum  calculation 
angles  and  range  steps  for  a  given  frequency.  When  using  this  option,  most  error 
checking  is  bypassed  and  parameter  limits  can  be  over-ridden.  Erroneous  field  values 
may  result  if  a  poorly  chosen  combination  of  thmax  and  rmuit  are  used. 

APM  Ver.  2.1.04  can  detennine  and  provide  direct  and  reflected  propagation 
angles,  as  well  as  the  propagation  factor  from  direct  and  reflected  rays,  to  the  main 
calling  program.  Note  that  these  quantities  are  obtained  only  from  the  FE  and  RO  sub¬ 
models  in  APM.  It  does  not  compute  the  angles  and  propagation  factors  for  the  separate 
rays  within  the  split-step  PE  and  XO  sub-models,  but  does  provide  the  resultant 
propagation  angle  and  factor  within  these  regions.  This  information  is  returned  if  the 
logical  flag  lang  is  set  to  ‘.true.’,  however,  do  not  enable  this  feature  if  any  portion  of  the 
propagation  path  is  over  land.  The  computation  is  valid  only  when  the  propagation  path 
is  entirely  over  water. 

3.5  ADAPTATION  REQUIREMENTS 

3.5.1  Environmental  Radio  Refractivity  Field  Data  Elements 

The  radio-refractivity  field,  i.e.,  the  profiles  of  modified  refractivity  (M-units) 
versus  height,  must  consist  of  vertical  piece-wise  linear  profiles  specified  by  couplets  of 
height  in  meters  with  respect  to  mean  sea  level  and  M-units  at  multiple  arbitrary  ranges. 
All  vertical  profiles  must  contain  the  same  number  of  vertical  data  points  and  be 
specified  such  that  each  numbered  data  point  corresponds  to  like-numbered  points  (i.e., 
features)  in  the  other  profiles.  The  first  numbered  data  point  of  each  profile  must 
correspond  to  a  height  of  zero  mean  sea  level  and  the  last  numbered  data  point  must 


33 


correspond  to  a  height  such  that  the  modified  refractivity  for  all  greater  heights  is  well 
represented  by  extrapolation  using  the  two  highest  profile  points  specified. 

With  the  inclusion  of  terrain  and  allowing  the  terrain  profile  to  fall  below  mean 
sea  level,  refractivity  profiles  can  also  be  provided  in  which  the  first  level  is  less  than  0 
(or  below  mean  sea  level).  For  a  terrain  profile  that  falls  below  mean  sea  level  at  some 
point,  the  assumption  is  that  the  minimum  height  may  be  less  than  the  first  height  in  any 
refractivity  profile  specified.  Therefore,  an  extrapolation  flag,  iextra,  must  be  specified  to 
indicate  how  the  APM  CSCI  should  extrapolate  from  the  first  refractivity  level  to  the 
minimum  height  along  the  terrain  profile.  Setting  iextra  to  0  will  cause  the  APM  CSCI  to 
extrapolate  to  the  minimum  height  using  a  standard  atmosphere  gradient;  setting  iextra  to  1 
will  cause  the  APM  CSCI  to  extrapolate  to  the  minimum  height  using  the  gradient 
determined  from  the  first  two  levels  of  the  refractivity  profile. 

Within  each  profile,  each  numbered  data  point  must  correspond  to  a  height  greater 
than  or  equal  to  the  height  of  the  previous  data  point.  Note  that  this  requirement  allows 
for  a  profile  containing  redundant  data  points.  Note  also  that  all  significant  features  of 
the  refractivity  profiles  must  be  specified,  even  if  they  are  above  the  maximum  output 
height  specified  for  a  particular  application  of  APM. 

The  external  CSCI  application  designer  and  the  external  operator  share 
responsibility  for  determining  appropriate  environmental  inputs.  For  example,  a  loss 
diagram  may  be  used  to  consider  a  surface-to-surface  radar  detection  problem.  Since  the 
operator  is  interested  in  surface-to-surface,  he  may  truncate  the  profile  assuming  that 
effects  from  elevated  ducting  conditions  are  negligible.  It  may  be  however,  that  the 
elevated  duct  does  indeed  produce  a  significant  effect.  The  operator  should  insure 
therefore,  that  the  maximum  height  of  the  profile  allows  for  the  inclusion  of  all 
significant  refractive  features. 

This  specification  allows  a  complicated  refractivity  field  to  be  described  with  a 
minimum  of  data  points.  For  example,  a  field  in  which  a  single  trapping  layer  linearly 
descends  with  increasing  range  can  be  described  with  just  two  profiles  containing  only 
four  data  points  each,  frame  (a)  of  Figure  7.  In  the  same  manner,  other  evolutions  of 
refractive  layers  may  be  described.  Frames  (b)  and  (c)  of  Figure  7  show  two  possible 
scenarios  for  the  development  of  a  trapping  layer.  The  scenario  of  choice  is  the  one  that 
is  consistent  with  the  true  thermodynamical  and  hydrological  layering  of  the  atmosphere. 
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Figure  7.  Idealized  M-unit  profiles  (solid)  and  lines  of  interpolation  (dashed). 


Two  external  implementation  data  variables  applicable  to  the  external  application 
operator  and  the  calling  application  designer  are  rmax,  the  maximum  APM  CSCI  output 
range,  and  hmax,  the  maximum  APM  CSCI  output  height.  These  two  parameters  are 
required  by  the  APM  CSCI  to  detennine  the  horizontal  and  vertical  resolution, 
respectively,  for  internal  range  and  height  calculations  based  on  the  current  values  of  nrout 
and  nzout-  Any  value  of  rmax  and  hmax  is  allowed  for  the  convenience  of  the  external 
application  operator  and  the  calling  application  designer,  provided  rmax  >  5  km,  and  hmax 
>100  m.  For  example,  the  external  application  operator  may  desire  a  coverage  diagram 
that  extends  to  a  range  of  500  km.  In  addition  to  accommodating  the  desires  of  the 
operator,  specification  of  such  a  convenient  maximum  range  eases  the  burden  for  the 
application  designer  in  determining  incremental  tick  marks  for  the  horizontal  axis  of  the 
display. 

Provided  the  value  of  the  parameter  I  err  12  is  set  to  ‘.false.’,  if  the  furthest 
environment  profile  range  is  less  than  rmax,  the  APM  CSCI  will  automatically  create  an 
environment  profile  at  rmax  equal  to  the  last  profile  specified,  making  the  environment 
homogeneous  from  the  range  of  the  last  profile  specified  to  rmax.  For  example,  a  profile  is 
input  with  an  accompanying  range  of  450  km.  If  the  external  application  operator 
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chooses  an  rmax  of  500  km,  the  APM  CSCI  will  continue  propagation  loss/factor 
calculations  to  500  km,  keeping  the  refractivity  environment  homogeneous  from  450 
to  500  km. 

If  lerrl2  is  set  to  ‘.true.’  and  the  furthest  environment  profile  range  is  less  than 
rmax,  then  an  error  will  be  returned  in  ierror  from  the  APMINIT  CSC,  which  allows  the 
external  CSCI  application  designer  greater  flexibility  in  how  environment  data  are 
handled. 

3.5.2  Terrain  Profile  Data  Element 

The  terrain  profile  must  consist  of  linear  piece-wise  segments  specified  as 
range/height  pairs.  All  range  values  must  be  increasing,  and  the  first  terrain  height  value 
must  be  at  range  zero.  General  ground  composition  types  can  be  specified  (Table  4), 
along  with  corresponding  ranges  over  which  the  ground  type  is  to  be  applied.  If  ground 
type  “User  Defined”  is  specified  (igrnd,  =  7),  then  numeric  values  of  relative  permittivity 
and  conductivity  must  be  given.  If  horizontal  antenna  polarization  is  specified,  and  if 
running  a  smooth  surface  case,  the  APM  CSCI  will  assume  perfect  conductivity  for  the 
entire  terrain  profile  and  will  ignore  any  infonnation  regarding  ground  composition.  If 
vertical  antenna  polarization  is  specified,  or  if  performing  rough  surface  calculations, 
then  information  regarding  ground  composition  must  also  be  specified.  If  wind  speed  has 
been  provided,  then  rough  surface  calculations  will  also  be  performed. 

The  maximum  height,  hmax,  must  always  be  greater  than  the  minimum  height,  h„un, 
by  at  least  100  m.  Also,  a  value  of  hmax  must  be  given  such  that  it  is  larger  than  the 
maximum  elevation  height  along  a  specified  terrain  profile. 

If  lerr6  is  set  to  ‘.false.’  and  the  furthest  range  point  in  the  terrain  profile  is  less 
than  rmax,  the  APM  CSCI  will  automatically  create  a  height/range  pair  as  part  of  the 
terrain  profile  at  rmax  with  elevation  height  equal  to  the  last  height  specified  in  the  profile, 
making  the  terrain  profile  flat  from  the  range  of  the  last  profile  point  specified  to  rmax. 
For  example,  a  terrain  profile  is  input  where  the  last  height/range  pair  is  50  m  high  with 
an  accompanying  range  of  95  km.  If  the  external  application  operator  chooses  an  rmax  of 
100  km,  the  APM  CSCI  will  continue  propagation  loss/factor  calculations  to  100  km, 
keeping  the  terrain  profile  flat  from  95  to  100  km  with  an  elevation  height  of  50  m. 

If  lerr6  is  set  to  ‘.true.’  and  the  furthest  range  point  is  less  than  rmax,  then  an  error 
is  returned  in  ierror  from  the  APMINIT  SU,  which  allows  the  external  CSCI  application 
designer  greater  flexibility  in  how  terrain  data  is  handled. 

3.6  SECURITY  AND  PRIVACY  REQUIREMENTS 

The  security  and  privacy  requirements  are  the  same  as  those  required  by  the  target 
employing  the  external  CSCI. 
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3.7  CSCI  ENVIRONMENTAL  REQUIREMENTS 


The  APM  CSCI  must  operate  in  the  same  hardware  and  software  environments 
that  the  target  employing  the  external  CSCI  operates. 

3.8  COMPUTER  RESOURCE  REQUIREMENTS 

Section  3. 1.2. 5  describes  requirements  for  a  Discrete  Sine/Cosine  Fast-Fourier 
Transform  (DRST)  SU.  However,  other  sine  FFT  routines  are  available  in  the 
commercial  market,  and  such  a  sine  FFT  may  already  be  available  within  another 
external  CSCI.  The  selection  of  which  FFT  ultimately  used  by  APM  CSCI  is  left  to  the 
application  designer,  as  every  sine  FFT  will  have  hardware  and/or  software  performance 
impacts. 

3.9  SOFTWARE  QUALITY  FACTORS 

The  primary  required  quality  factors  can  be  divided  into  the  three  categories: 
design,  performance,  and  adaptation. 

The  quality  factors  for  the  design  category  should  include  correctness, 
maintainability,  and  verifiability.  Correctness  describes  the  extent  to  which  the  APM 
CSCI  conforms  to  its  requirements  and  is  determined  from  the  criteria  of  completeness, 
consistency,  and/or  traceability.  Maintainability  specifies  the  effort  required  to  locate  and 
fix  an  error  in  the  APM  CSCI.  Maintainability  is  detennined  from  the  criteria  of 
consistency,  modularity,  self-descriptiveness  (self-documentation),  and/or  simplicity. 
Verifiability  characterizes  the  effort  required  to  test  the  APM  CSCI  to  ensure  that  it 
performs  its  intended  function.  Verifiability  is  determined  from  the  criteria  of  modularity, 
self-descriptiveness,  and/or  simplicity. 

The  quality  factor  for  the  performance  category  is  reliability,  which  depicts  the 
confidence  that  can  be  placed  in  the  APM  CSCI  calculations.  Reliability  is  detennined 
from  the  criteria  of  accuracy,  anomaly  management,  auditability,  consistency,  and/or 
simplicity. 

The  quality  factors  for  the  adaptation  category  are  portability  and  reusability. 
Portability  determines  how  easy  it  is  to  transport  the  APM  CSCI  from  one  hardware 
and/or  software  environment  to  another.  Portability  is  determined  from  the  criteria  of 
application  independence,  modularity,  and/or  self-descriptiveness.  Reusability  illustrates 
how  easy  it  is  to  convert  the  APM  CSCI  (or  parts  of  the  CSCI)  for  use  in  another 
application.  Reusability  is  detennined  from  the  criteria  of  application  independence, 
document  accessibility,  functional  scope,  generality,  hardware  independence,  modularity, 
simplicity,  self-descriptiveness,  and/or  system  clarity. 
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Section  A. A.  1  defines  the  software  quality  criteria. 


Only  the  software  quality  criteria  of  completeness,  consistency,  and  traceability 
can  be  analyzed.  Their  calculation  is  described  in  Section  A.2.  The  other  criteria  must 
be  detennined  by  demonstration,  test,  or  inspection. 

3.10  DESIGN  AND  IMPLEMENTATION  CONSTRAINTS 

3.10.1  Implementation  And  Application  Considerations 

The  calling  external  CSCI  application  will  determine  the  employment  of  the  APM 
CSCI.  However,  the  intensive  computational  nature  of  the  APM  CSCI  must  be 
considered  when  designing  an  efficient  calling  application.  For  this  reason,  the  APM 
CSCI  should  be  designed  with  flexibility  for  various  hardware  suites  and  computer 
resource  management  considerations.  As  stated  in  Section  1,  this  APM  CSCI  applies 
only  to  a  coverage  and  loss  diagram  application.  The  following  highly  recommended 
guidelines  will  aid  in  the  design  of  a  coverage  or  loss  diagram  application  that  will  most 
efficiently  employ  the  APM  CSCI. 

The  APM  CSCI  propagation  loss  calculations  are  independent  of  any  target  or 
receiver  considerations;  therefore,  for  any  EM  emitter,  one  execution  of  the  APM  CSCI 
may  be  used  to  create  both  a  coverage  diagram  and  a  loss  diagram.  Since  both  execution 
time  and  computer  memory  allocation  should  be  a  consideration  when  employing  this 
model,  it  is  most  efficient  and  appropriate  to  execute  the  APM  CSCI  for  a  particular  EM 
system/environmental/terrain  combination  before  executing  any  application.  The  output 
of  the  APM  CSCI  would  be  stored  in  a  file  that  would  be  accessed  by  multiple 
applications. 

For  example,  the  external  application  operator  may  desire  a  coverage  diagram  for 
one  particular  radar  system.  At  the  beginning  of  the  coverage  diagram  application,  a 
check  would  be  made  for  the  existence  of  a  previously  created  APM  CSCI  output  file 
appropriate  for  the  EM  system  and  environmental  and  terrain  conditions.  If  such  a  file 
exists,  the  propagation  loss  values  would  be  read  from  the  file  and  used  to  create  the 
coverage  diagram.  If  the  file  does  not  exist,  the  APM  CSCI  would  be  executed  to  create 
one.  As  the  APM  CSCI  is  executing,  its  output  could  be  routed  simultaneously  to  a 
graphics  display  device  and  a  file.  This  file  could  then  be  used  in  the  loss  diagram 
application,  should  the  operator  also  choose  it.  Two  distinct  applications,  therefore,  are 
achieved  with  only  one  execution  of  the  APM  CSCI.  Additionally,  should  the  operator 
desire  an  individual  coverage  diagram  for  each  of  multiple  targets,  or  a  single  coverage 
diagram  illustrating  radar  detection  of  a  low-flying  missile  superimposed  on  a  coverage 
diagram  illustrating  his/her  own  radar’s  vulnerability  as  defined  by  the  missile’s  ESM 
receiver,  only  a  single  execution  of  the  APM  CSCI  would  be  required,  thereby  saving 
valuable  computer  resources. 
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3.10.2  Programming  Language  And  Source  Implementation 
3.10.2.1  Programming  Language 

The  ANSI  Fortran  95  program  language  standard  must  be  used  in  the 
development  of  the  APM  CSCI.  This  standard  consists  of  the  specifications  of  the 
language  Fortran.  With  certain  limitations,  the  syntax  and  semantics  of  the  old 
International  Standard  commonly  known  as  “FORTRAN  77”  are  contained  entirely 
within  this  new  International  Standard.  Therefore,  any  standard-conforming  FORTRAN 
77  program  is  standard,  conforming  under  the  Fortran  95  Standard.  Note  that  the  name 
of  this  language,  Fortran,  differs  from  that  in  FORTRAN  77  in  that  only  the  first  letter  is 
capitalized.  The  Overview  section  of  the  International  Standard  describes  the  major 
additions  to  FORTRAN  77  in  this  International  Standard.  Section  1.3  of  the  International 
Standard  specifies  the  bounds  of  the  Fortran  language  by  identifying  those  items  included 
and  those  items  excluded.  Section  1.4.1  describes  the  FORTRAN  77  compatibility  of  the 
International  Standard  with  emphasis  on  four  FORTRAN  77  features  having  different 
interpolations  in  the  new  International  Standard.  The  International  Standard  provides 
facilities  that  encourage  the  design  and  the  use  of  modular  and  reusable  software. 

Section  8.2  of  the  International  Standard  describes  nine  obsolescent  features  of 
FORTRAN  77  that  are  redundant  and  for  which  better  methods  are  available  in 
FORTRAN  77  itself.  These  nine  obsolescent  features  should  not  be  used.  These 
obsolescent  features  are  as  follows: 

1 .  Arithmetic  IF  -  use  the  IF  statement. 

2.  Real  and  double  precision  DO  control  variables  and  DO  loop  control  expressions  - 
use  integer. 

3.  Shared  DO  termination  and  tennination  on  a  statement  other  than  END  DO  or 
CONTINUE  -  use  an  END  DO  or  a  CONTINUE  statement  for  each  DO  statement. 

4.  Branching  to  an  END  IF  statement  from  outside  its  IF  block  -  branch  to  the  statement 
following  the  END  IF. 

5.  Alternate  return. 

6.  PAUSE  statement. 

7.  ASSIGN  and  assigned  GO  TO  statements. 

8.  Assigned  FORMAT  specifiers. 

9.  cH  (nH)  edit  descriptor. 
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Remedies  for  the  last  five  obsolescent  features  are  described  in  Section  8.2  of  the 
International  standard. 

3.10.2.2  Source  Implementation 

The  Standards  document  by  the  Naval  Oceanographic  Office  establishes  a 
uniform  standard  for  all  software  submitted  by  all  contributors  to  them.  It  is 
recommended  that  the  coding  requirements  set  forth  in  Section  4  of  that  document  be 
followed.  Among  these  recommendations  are: 

1.  Special  non-ANSI  features  shall  be  avoided.  Non- ANSI  practices  that  are  necessary 
must  be  documented  in  the  code  itself. 

2.  Maximum  use  should  be  made  of  existing  commercially  available  FORTRAN 
callable  libraries. 

3.  Programs  shall  be  designed  and  coded  using  only  five  basic  control  structures  - 
sequence  of  operations  (assignment,  add,  ...),  IF  THEN  ELSE,  DO  WHILE,  DO 
UNTIL,  and  CASE. 

4.  Procedures  or  routines  that  make  up  a  module  shall  not  exceed  an  average  of  100 
executable  statements  per  procedure  or  routine  and  shall  not  exceed  a  maximum  of 
200  executable  statements  in  any  procedure  or  routine. 

5.  Branching  statements  (GO  TOs)  shall  only  pass  control  to  a  statement  that  is  in  the 
same  procedure  or  routine.  Each  GO  TO  must  pass  control  only  forward  of  its  point 
of  occurrence. 

6.  Naming  conventions  shall  be  uniform  throughout  the  software.  Program,  subprogram, 
module,  procedure,  and  data  names  shall  be  uniquely  chosen  to  identify  the 
applicable  function  perfonned.  The  naming  convention  for  COMMON  shall  be 
consistent  across  the  entire  program. 

7.  Constants  shall  be  defined  not  calculated  (e.g.,  do  no  use  HALF  =  'A,  use  HALF  = 
0.5 ) 

8.  Mixed-mode  numerical  operations  should  be  avoided  whenever  possible.  When 
determined  to  be  necessary,  the  use  shall  be  explicit  {FLOAT,  FIX,  or  in  assignment 
statement)  and  completely  described  in  comments. 

9.  Each  component  of  the  software  shall  have  a  prologue  containing  the  name  of  the 
program,  subprogram,  or  function  and  any  version  number;  purpose;  inputs;  outputs; 
list  of  routines  that  call  this  routine;  complete  list  of  routines  called  including 
intrinsic  functions  such  as  ABS  and  FLOAT,  glossary;  and  method. 


40 


10.  To  facilitate  program  comprehension,  comment  statements  shall  be  used  throughout 
the  program  code. 

1 1 .  The  use  of  the  EQUIVALENCE  statement  shall  be  restricted  to  those  where  it  either 
improves  the  readability  of  the  code  or  the  efficiency  of  the  program.  If  the 
EQUIVALENCE  statement  is  used,  it  must  be  fully  documented  in  the  prologue  and 
inline  comment  statements. 

12.  No  machine-dependent  techniques  are  allowed,  unless  there  is  no  other  way  of 
performing  the  task. 

13.  Initialize  every  variable  before  use. 

14.  Do  not  depend  on  the  values  of  “local”  variables  computed  on  a  previous  call  to  a 
routine. 

15.  Program  structural  indentation  shall  be  used  to  improve  readability  and  clarity. 

3.11  PERSONNEL-RELATED  REQUIREMENTS 

N/A. 

3.12  TRAINING  RELATED  REQUIREMENTS 

The  employing  target  software  personnel  implementing  this  CSCI  into  the 
external  CSCI  will  require  training  to  become  familiar  with  APM.  This  requirement 
should  be  met  by  this  document  and  the  companion  Software  Design  Description  (SDD) 
and  Software  Test  Description  (STD)  documents. 

3.13  OTHER  REQUIREMENTS 

None. 

3.14  PRECEDENCE  AND  CRITICALITY  OF  REQUIREMENTS 

The  requirements  presented  in  Sections  3.1  through  3.5  and  Sections  3.8  through 
3.10  have  precedence  over  Sections  3.6,  3.7,  3.11,  3.12,  and  3.13  and  should  be  given 
equal  weight. 
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4.  QUALIFICATION  PROVISIONS 


N/A 


5.  REQUIREMENTS  TRACEABILITY 

5.1  SYSTEM  TRACEABILITY 

This  section  provides  traceability  of  requirements  between  the  APM  CSCI  and  the 

external  CSCI. 

1.  The  APM  CSCI  environmental  data  requirements  should  be  obtained  from  the 
environmental  application  or  database  within  the  external  CSCI.  The  APM  CSCI 
terrain  data  element  requirements  should  be  obtained  from  any  desired  terrain 
database  within  the  external  CSCI,  however,  it  is  up  to  the  external  CSCI  to  extract 
the  terrain  in  the  proper  format  for  inputting  to  APM.  The  radar/communication 
system  data  element  requirements  should  be  obtained  from  the  EM  system  database 
within  the  external  CSCI. 

2.  The  external  CSCI  requirement  of  propagation  loss  vs.  range  and  height  should  be 
obtained  from  the  APM  CSCI. 

5.2  DOCUMENTATION  TRACEABILITY 

This  section  provides  the  following  types  of  traceability  between  the  Software 

Requirements  Specification  (SRS),  the  Software  Design  Description  (SDD),  and  the 

Software  Test  Description  (STD): 

1 .  Traceability  between  levels  of  requirements 

2.  Traceability  between  the  software  requirements  and  software  design 

3.  Traceability  between  the  software  requirements  and  qualification  test  infonnation 
obtained  from  the  software  testing 
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This  traceability  of  the  Advanced  Propagation  Model  is  presented  in  two  tables. 
The  first  table,  Table  7,  presents  the  traceability  between  levels  of  SRS  requirements. 
The  second  table  (Table  137  in  the  SDD)  presents  the  traceability  between  the  software 
requirements  and  software  design. 


Table  7.  Requirements  traceability  matrix  for  the  SRS. 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

CSCI  Capability  Requirements 

3.1 

Advance  Propagation  Initialization 
(APMINIT)  CSC 

3.1.1 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

Allocate  Arrays  APM 
(ALLARRAY_APM)  SU 

3. 1.1.1 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

Allocate  Array  RO 
(ALLARRAY  RO)  SU 

3.1. 1.3 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

Allocate  Array  XORUF  (XORUF) 

SU 

3. 1.1.4 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

Alpha  Impedance  Initialization 
(ALN  INIT)  SU 

3. 1.1.5 

Alpha  Impedance  Initialization 
(ALNJNIT)SU 

3. 1.1. 5 

Get  Alpha  Impedance  (GETALN) 
SU 

3.1.1.13 

Get  Alpha 

Impedance(GETALN)  SU 

3.1.1.13 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Alpha 

Impedance(GETALN)  SU 

3.1.1.13 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FN  DIECON) 
Function 

3.1 .2.3 

Get  Alpha 

Impedance(GETALN)  SU 

3.1.1.13 

Surface  Impedance  (SURFIMP) 

SU 

3.1.2.23 

Surface  Impedance 
(SURFIMP)  SU 

3.1.2.23 

Poly  4  (FN  POLY4)  Function 

3.1.1.20 

Surface  Impedance 
(SURFIMP)  SU 

3.1.2.23 

Poly  5  (FN  POLY5)  Function 

3.1.1.21 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

Dielectric  Initialization  (DIEINIT) 

SU 

3.1. 1.8 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

3.1.1 

FFT  Parameters  (FFTPAR)  SU 

3.1. 1.9 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Fill  Height  Arrays  (FILLHT)  SU 

3.1.1.10 

Fill  Height  Arrays  (FILLHT)  SU 

3.1.1.10 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

3.1.1.27 

Fill  Height  Arrays  (FILLHT)  SU 

3.1.1.10 

Trace  to  Next  Step  (TRACE  STEP) 

SU 

3.1.1.28 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

3.1.1.28 

Height  Check  (HTCHECK)  SU 

3.1.1.17 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Gaseous  Absorption  (GASABS)  SU 

3.1.1.11 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Get  Effective  Earth  Radius  Factor 
(GET  K)  SU 

3.1.1.12 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

APM  Status  (APMSTATUS)  SU 

3. 1.1.7 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

DOSHIFTSU 

3. 1.2.4 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Free  Space  Range  Step  (FRSTP)  SU 

3.1.1.24 

Free  Space  Range  Step 
(FRSTP)  SU 

3. 1.2.9 

Fast  Fourier  Transform  (FFT)  SU 

3. 1.2.8 

Fast  Fourier  Transform  (FFT) 

SU 

3. 1.2.8 

Discrete  Sine/Cosine  Transform 
(DRST)  SU 

3.1 .2.5 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Refractivity  Interpolation  (REFINTER) 
SU 

3.1.2.18 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Interpolate  Profile  (INTPROF)  SU 

3.1.1.18 

Interpolate  Profile  (INTPROF) 

SU 

3.1.1.18 

Linear  Interpolation  (FN  PLINT) 
Function 

3.1.2.14 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Profile  Reference  (PROFREF)  SU 

3.1.1.22 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Remove  Duplicate  Refractivity  Levels 
(REMDUP)  SU 

3.1.1.24 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

RG  Trace  (RGTRACE)  SU 

3.1.1.25 

RG  Trace  (RGTRACE)  SU 

3.1.1.25 

Trace  to  Next  Step  (TRACE  STEP) 

SU 

3.1.1.28 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

3.1.1.28 

Height  Check  (HTCHECK)  SU 

3.1.1.17 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Spectral  Estimation  (SPECEST)  SU 

3.1.2.22 

Spectral  Estimation  (SPECEST) 
SU 

3.1.2.22 

Discrete  Sine/Cosine  Transform 
(DRST)  SU 

3.1 .2.5 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Trace  to  Output  Range 
(TRACE  ROUT)  SU 

3.1.1.27 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Get  Maximum  Angle  (GETTHMAX) 

SU 

3.1.1.15 

Get  Maximum  Angle 
(GETTHMAX)  SU 

3.1.1.15 

FFT  Parameters  (FFTPAR)  SU 

3. 1.1.9 

Get  Maximum  Angle 
(GETTHMAX)  SU 

3.1.1.15 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

3.1.1.27 

Advance  Propagation 

Initialization  (APMinit)  CSC 

3.1.1 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

3.1.1.16 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

3.1.1.16 

Linear  Interpolation  (FN  PLINT) 
Function 

3.1.2.14 

Advance  Propagation 

Initialization  (APMinit)  CSC 

3.1.1 

PE  Initialization  (PEINIT)SU 

3.1.1.19 

PE  Initialization  (PEINIT)SU 

3.1.1.19 

Allocate  Array  PE  (ALLARRAY  PE) 
SU 

3. 1.1.2 

PE  Initialization  (PEINIT)SU 

3.1.1.19 

Interpolate  Profile  (INTPROF)  SU 

3.1.1.18 

PE  Initialization  (PEINIT)SU 

3.1.1.19 

Starter  Field  Initialization  (XYINIT) 

SU 

3.1.1.30 

Starter  Field  Initialization 
(XYINIT)  SU 

3.1.1.30 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Starter  Field  Initialization 
(XYINIT)  SU 

3.1.1.30 

Discrete  Sine/Cosine  Transform 
(DRST)  SU 

3. 1.2.5 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Profile  Reference  (PROFREF)  SU 

3.1.1.22 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

3.1.1 

Refractivity  Initialization  (REFINIT) 

SU 

3.1.1.23 

Refractivity  Initialization 
(REFINIT)  SU 

3.1.1.23 

Profile  Reference  (PROFREF)  SU 

3.1.1.22 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Refractivity  Initialization  (REFIN IT) 
SU 

3.1.1.23 

Remove  Duplicate  Refractivity 
Levels  (RemDup)  SU 

3.1.1.24 

Advance  Propagation  Initialization 
(APMINIT)  CSC 

3.1.1 

Remove  Duplicate  Refractivity 
Levels  (RemDup)  SU 

3.1.1.24 

Advance  Propagation  Initialization 
(APMINIT)  CSC 

3.1.1 

Terrain  Initialization  (TERINIT) 

SU 

3.1.1.26 

Advance  Propagation  Initialization 
(APMinit)  CSC 

3.1.1 

Troposcatter  Initialization 
(TROPOINIT)  SU 

3.1.1.29 

Troposcatter  Initialization 
(TROPOINIT)  SU 

3.1.1.29 

Antenna  Pattern  (Antpat)  SU 

3.1. 1.6 

Troposcatter  Initialization 
(TROPOINIT)  SU 

3.1.1.29 

Get  Effective  Earth  Radius  Factor 
(GET  K)  SU 

3.1.1.12 

CSCI  Capability  Requirements 

3.1 

Advance  Propagation  Model  Step 
(APMSTEP)  CSC 

3.1.2 

Advance  Propagation  Model  Step 
(APMSTEP)  CSC 

3.1.2 

Flat-Earth  Direct  Ray  (FEDR)  SU 

3. 1.2. 6 

Flat-Earth  Direct  Ray  (FEDR)  SU 

3.1 .2.6 

Antenna  Pattern  (Antpat)  SU 

3.1. 1.6 

Advance  Propagation  Model  Step 
(APMSTEP)  CSC 

3.1.2 

Flat-Earth  Model  (FEM)  SU 

3. 1.2. 7 

Flat-Earth  Model  (FEM)  SU 

3. 1.2. 7 

Antenna  Pattern  (Antpat)  SU 

3. 1.1. 6 

Flat-Earth  Model  (FEM)  SU 

3. 1.2. 7 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.16 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

3.1 .2.3 

Advance  Propagation  Model  Step 
(APMSTEP)  CSC 

3.1.2.10 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

3. 1.2.1 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

3. 1.2.1 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

3.1.2.11 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

3. 1.2.1 

Linear  Interpolation  (FN  PLINT) 
Function 

3.1.2.14 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

3. 1.2.1 

Troposcatter  (TROPOSCAT) 

SU 

3.1.2.24 

Troposcatter  (TROPOSCAT)  SU 

3.1.2.24 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

3.1.2.13 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

3.1.2.13 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

DOSHIFTSU 

3. 1.2.4 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Free  Space  Range  Step 
(FRSTP)  SU 

3.1.1.24 

Free  Space  Range  Step  (FRSTP) 
SU 

3.1.1.24 

Fast-Fourier  Transform  (FFT) 

SU 

3. 1.2.8 

Fast-Fourier  Transform  (FFT)  SU 

3.1 .2.8 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

3. 1.2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

FZLIM  SU 

3.1.2.10 

FZLIM  SU 

3.1.2.10 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

3.1.2.11 

FZLIM  SU 

3.1.2.10 

Save  Profile  (SAVEPRO)  SU 

3.1.2.21 

FZLIM  SU 

3.1.2.10 

Spectral  Estimation 
(SPECEST)  SU 

3.1.2.22 

Spectral  Estimation  (SPECEST) 

SU 

3.1.2.22 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

3. 1.2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Get  Alpha  Impedance 
(GETALN)  SU 

3.1.1.13 

Get  Alpha  Impedance  (GETALN) 
SU 

3.1.1.13 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Alpha  Impedance  (GETALN) 
SU 

3.1.1.13 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

3.1 .2.3 

Get  Alpha  Impedance(GETALN) 

SU 

3.1.1.13 

Surface  Impedance 
(SURFIMP)  SU 

3.1.2.23 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Surface  Impedance  (SURFIMP) 

SU 

3.1.2.23 

Poly  4  (FN  POLY4)  Function 

3.1.1.20 

Surface  Impedance  (SURFIMP) 

SU 

3.1.2.23 

Poly  5  (FN  POLY5)  Function 

3.1.1.21 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

3.1.2.15 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

3.1.2.15 

Free  Space  Range  Step  (FRSTP) 
SU 

3.1.1.24 

Free  Space  Range  Step  (FRSTP) 
SU 

3.1.1.24 

Fast-Fourier  Transform  (FFT)  SU 

3.1 .2.8 

Fast-Fourier  Transform  (FFT)  SU 

3. 1.2. 8 

Discrete  Sine/Cosine  Transform 
(DRST)  SU 

3.1 .2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Interpolate  Profile  (INTPROF)  SU 

3.1.1.18 

Interpolate  Profile  (INTPROF)  SU 

3.1.1.18 

Linear  Interpolation  (FN_PLINT) 
Function 

3.1.2.14 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Profile  Reference  (PROFREF)  SU 

3.1.1.22 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Remove  Duplicate  Refractivity 
Levels  (REMDUP)  SU 

3.1.1.24 

Advance  Propagation  Model  Step 
(APMSTEP)  CSC 

3.1.2 

Ray  Optics  Loss  (ROLOSS)  SU 

3.1.2.20 

Ray  Optics  Loss  (ROLOSS)  SU 

3.1.2.20 

Ray  Optics  Calculation  (ROCALC) 
SU 

3.1.2.19 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FN  DIECON) 
Function 

3.1 .2.3 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Ray  Trace  (RAYTRACE)  SU 

3.1.2.17 

CSCI  Capability  Requirements 

3.1 

Extended  Optics  Initialization 
(XOINIT)  CSC 

3.1.3 

Extended  Optics  Initialization 
(XOINIT)  CSC 

3.1.3 

APM  Clean  (APMCLEAN)  SU 

3.1 .3.1 

APM  Clean  (APMCLEAN)  SU 

3.1 .3.1 

Discrete  Sine/Cosine  (DRST)  SU 

3.1 .3.1 

Extended  Optics  Initialization 
(XOINIT)  CSC 

3.1.3 

Clutter-to-Noise  (CLUTTER)  SU 

3.1 .3.2 

Clutter-to-Noise  (CLUTTER)  SU 

3.1 .3.2 

GIT  Initialization  (GITJNIT)  SU 

3.1 .3.5 

GIT  Initialization  (GITJNIT)  SU 

3.1 .3.5 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Clutter-to-Noise  (CLUTTER)  SU 

3.1 .3.2 

Standard  Propagation  Model 
Initialization  (SPMJNIT)  SU 

3.1.3.11 

Clutter-to-Noise  (CLUTTER)  SU 

3.1 .3.2 

Standard  Propagation  Model  (SPM) 
SU 

3.1.3.12 

Standard  Propagation  Model 
(SPM)SU 

3.1.3.12 

Diffraction  Loss  (FN  DLOSS) 
Function 

3.1 .3.3 

Standard  Propagation  Model 
(SPM)SU 

3.1.3.12 

GofZ  (FN  GOFZ)  Function 

3.1 .3.6 

Standard  Propagation  Model 
(SPM)SU 

3.1.3.12 

Optical  Region  Limit  (OPLIMIT)  SU 

3.1 .3.8 

Optical  Region  Limit  (OPLIMIT) 

SU 

3.1 .3.8 

Get  Theta  (GETTHETA)  SU 

3.1 .3.4 

Get  Theta  (GETTHETA)  SU 

3.1 .3.8 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FN  DIECON) 
Function 

3.1 .2.3 

Optical  Region  Limit  (OPLIMIT) 

SU 

3.1 .3.8 

R1  Iteration  (R1ITER)  SU 

3.1 .2.3 

R1  Iteration  (RIITER)SU 

3.1 .2.3 

Get  Theta  (GETTHETA)  SU 

3.1 .3.4 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Get  Theta  (GETTHETA)  SU 

3.1 .3.4 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FNDIECON) 
Function 

3.1 .2.3 

Standard  Propagation  Model 
(SPM)SU 

3.1.3.12 

Optical  Difference  (OPTICF)  SU 

3.1 .3.9 

Optical  Difference  (OPTICF)  SU 

3.1 .3.9 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FN  DIECON) 
Function 

3.1 .2.3 

Extended  Optics  Initialization 
(XOINIT)  CSC 

3.1.3 

Mean  Filter  (MEANFILT)  SU 

3.1 .3.7 

CSCI  Capability  Requirements 

3.1 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

APM  Clean  (APMCLEAN)  SU 

3.1 .3.1 

APM  Clean  (APMCLEAN)  SU 

3.1 .3.1 

Discrete  Sine/Cosine  Transform 
(DRST)  SU 

3.1 .3.1 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

Extended  Optics  (EXTO)  SU 

3.1.4 

Extended  Optics  (EXTO)  SU 

3.1.4 

Linear  Interpolation  (FN  PLINT) 
Function 

3.1.2.14 

Extended  Optics  (EXTO)  SU 

3.1.4 

Troposcatter  (TROPOSCAT)  SU 

3.1.2.24 

Troposcatter  (TROPOSCAT)  SU 

3.1.2.24 

Get  T roposcatter  Loss 
(FN_GET_TLOSS)  Function 

3.1.2.13 

Get  Troposcatter  Loss 
(FN  GET  TLOSS)  Function 

3.1.2.13 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

Flat-Earth  Model  (FEM)  SU 

3. 1.2.7 

Flat-Earth  Model  (FEM)  SU 

3. 1.2. 7 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Flat-Earth  Model  (FEM)  SU 

3. 1.2. 7 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FNDIECON) 
Function 

3.1 .2.3 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

Ray  Optics  Loss  (ROLOSS)  SU 

3.1.2.20 

Ray  Optics  Loss  (ROLOSS)  SU 

3.1.2.20 

Ray  Optics  Calculation  (ROCALC) 
SU 

3.1.2.19 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Dielectric  Constant  (FN  DIECON) 
Function 

3.1 .2.3 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Ray  Trace  (RAYTRACE)  SU 

3.1.2.17 

CSCI  Capability  Requirements 

3.1 

Return  Grazing  Angle 
(RET_GRAZE)  CSC 

3.1.5 

CSCI  Capability  Requirements 

3.1 

CSCI  External  Interface 
Requirements 

3.2 

CSCI  Capability  Requirements 

3.1 

CSCI  Internal  Interface 
Requirements 

3.3 

CSCI  Capability  Requirements 

3.1 

CSCI  Internal  Data  Requirements 

3.4 

CSCI  Capability  Requirements 

3.1 

Adaptation  Requirements 

3.5 

CSCI  Capability  Requirements 

3.1 

Security  and  Privacy 

Requirements 

3.6 

CSCI  Capability  Requirements 

3.1 

CSCI  Environmental 

Requirements 

3.7 

CSCI  Capability  Requirements 

3.1 

Computer  Resource 

Requirements 

3.8 
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Table  7.  Requirements  traceability  matrix  for  the  SRS.  (continued) 


Software  Requirements  Specification 

Software  Requirements  Specification 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

CSCI  Capability  Requirements 

3.1 

Software  Quality  Factors 

3.9 

CSCI  Capability  Requirements 

3.1 

Design  And  Implementation 
Constraints 

3.10 

Design  And  Implementation 
Constraints 

3.10 

Implementation  and  Application 
Considerations 

3.10.1 

Design  And  Implementation 
Constraints 

3.10 

Programming  Language  And 
Source  Code  Implementation 

3.10.2 

Programming  Language  And 

Source  Code  Implementation 

3.10.2 

Programming  Language 

3.10.2.1 

Programming  Language  And 

Source  Code  Implementation 

3.10.2 

Source  Implementation 

3.10.2.2 

CSCI  Capability  Requirements 

3.1 

Personnel-Related  Requirements 

3.11 

CSCI  Capability  Requirements 

3.1 

Training  Related  Requirements 

3.12 

CSCI  Capability  Requirements 

3.1 

Other  Requirements 

3.13 

CSCI  Capability  Requirements 

3.1 

Precedence  and  Criticality  of 
Requirements 

3.14 

6.  NOTES 

Table  8  is  a  glossary  of  acronyms  and  abbreviations  used  within  this  document. 
Table  9  is  a  glossary  of  Fortran  terms  used  within  this  document. 
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Table  8.  Acronyms  and  abbreviations. 


Term 

Definition 

ANSI 

American  National  Standards  Institute 

APM 

Advanced  Propagation  Model 

cB 

centibel 

CSC 

Computer  Software  Component 

CSCI 

Computer  Software  Configuration  Item 

dB 

decibel 

EM 

Electromagnetic 

FFT 

Fast-Fourier  Transform 

Fortran 

Formula  Translation 

km 

kilometers 

m 

meters 

M 

modified  refractivity  units 

MHz 

megahertz 

N/A 

not  applicable 

PE 

Parabolic  Equation 

p-space 

phase  (angle)  space 

rad 

radians 

SDD 

Software  Design  Description 

SRS 

Software  Requirements  Specification 

STD 

Software  Test  Description 

SU 

Software  Unit 

z-space 

height  space 
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Table  9.  Fortran  terms. 


Term 

Action  or  Definitions 

ABS 

Absolute  value  function 

Arithmetic  IF 

Transfers  control  to  one  of  three  statement  labels,  depending  on  the 
vail ue  of  expression 

ASSIGN 

Assigns  the  value  of  a  format  or  statement  label  to  an  integer  variable 

CASE 

Marks  the  beginning  of  a  block  of  statements  executed  if  an  item  in  a 
list  of  expressions  matches  the  test  expressions 

COMMON 

Allows  two  or  more  program  units  to  directly  share  variables  without 
having  to  pass  them  as  arguments 

CONTINUE 

Does  not  have  any  effect 

DO 

Repeatedly  executes  the  statements  following  the  DO  statement 
through  the  statement  which  marks  the  end  of  the  loop 

DO  WHILE 

Executes  a  block  of  statements  repeatedly  while  a  logical  condition 
remains  true 

END  DO 

Terminates  a  DO  or  DO  WHILE  loop 

END  IF 

Terminates  a  block  of  IF  statements 

EQUIVALENCE 

Causes  two  or  more  variables  or  arrays  to  occupy  the  same  memory 
location 

FIX 

Data  type  conversion  function 

FLOAT 

Data  type  conversion  function 

FORMAT 

Sets  the  format  in  which  data  are  written  to  or  read  from  a  file 

GO  TO 

Transfers  execution  to  the  statement  label  assigned  to  variable 

IF 

If  expression  is  true,  statement  is  executed;  if  expression  is  false, 
program  execution  continues  with  the  next  executable  statement 

IF  THEN  ELSE 

If  expression  is  true,  statements  in  the  IF  block  are  executed;  if 
expression  is  false,  control  is  transferred  to  the  next  ELSE,  ELSE  IF, 
or  END  IF  statement  at  the  same  IF  level 

PAUSE 

Temporarily  suspends  program  execution  and  allows  you  to  execute 
operating  system  commands  during  the  suspension 
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APPENDIX  A 


A.1  DEFINITIONS  OF  QUALITY  FACTOR  CRITERIA 

The  criteria  for  judging  the  quality  factors  of  Section  3.9  have  the  following 

definitions: 

1 .  Accuracy.  The  precision  of  computations  and  control 

2.  Anomaly  management.  The  degree  to  which  the  program  detects  failure  in  order  to 
maintain  consistency 

3.  Application  independence.  The  degree  to  which  the  program  is  independent  of 
nonstandard  programming  language  features,  operating  system  characteristics,  and 
other  environmental  constraints 

4.  Auditability.  The  ease  with  which  conformance  to  standards  can  be  checked 

5.  Completeness.  The  degree  to  which  full  implementation  of  required  function  has  been 
achieved 

6.  Consistency.  The  use  of  uniform  design  and  documentation  techniques  throughout  the 
software  development  project 

7.  Document  accessibility.  The  availability  of  documents  describing  the  program 
components 

8.  Functional  scope.  The  generality  of  the  feature  set  and  capabilities  of  the  program 

9.  Generality.  The  breadth  of  potential  application  of  program  components 

10.  Hardware  independence.  The  degree  to  which  the  software  is  decoupled  from  the 
hardware  on  which  it  operates 

1 1 .  Modularity.  The  functional  independence  of  program  components 

12.  Self-descriptiveness.  The  degree  to  which  the  source  code  provides  meaningful 
documentation 

13.  Simplicity.  The  degree  to  which  a  program  can  be  understood  without  difficulty 
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14.  System  clarity.  The  ease  for  which  the  feature  set  and  capabilities  of  the  system  can 
be  determined 

15.  Traceability.  The  ability  to  trace  a  design  representation  or  actual  program  component 
back  to  requirements 

A.2  SOFTWARE  QUALITY  METRICS 
A.2.1  Completeness  Criteria 

The  criteria  completeness  can  be  determined  from  the  metric: 

1 .  no  ambiguous  references  (input,  function,  output) 

2.  all  data  references  defined 

3.  all  referenced  functions  defined 

4.  all  defined  functions  used 

5.  all  conditions  and  processing  defined  for  each  decision  point 

6.  all  defined  and  referenced  calling  sequences  parameters  agree 

7.  all  problem  reports  resolved 

8.  design  agrees  with  requirements 

9.  code  agrees  with  design 

10.  (score  0  for  any  untrue  statement;  1  otherwise) 

1 1 .  metric  value  =  SUM  (scores)/9 
A.2. 2  Consistency  Criteria 

The  criteria  consistency  can  be  detennined  from  the  metric:  number  of  modules 
violating  the  design  standard  divided  by  the  number  of  modules. 

A.2. 3  Traceability  Criteria 

The  criteria  traceability  can  be  detennined  from  the  metric:  number  of  itemized 
requirements  traced  divided  by  the  total  number  of  requirements. 
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SCOPE 


1.1  IDENTIFICATION 

The  Advanced  Propagation  Model  (APM)  Version  2.1.04  computer  software 
configuration  item  (CSCI)  calculates  range-dependent  electromagnetic  (EM)  system 
propagation  loss  within  a  heterogeneous  atmospheric  medium  over  variable  terrain, 
where  the  radio-frequency  index  of  refraction  is  allowed  to  vary  vertically  and 
horizontally,  also  accounting  for  terrain  effects  along  the  path  of  propagation. 


1.2  SYSTEM  OVERVIEW 

The  APM  CSCI  model  calculates  propagation  loss  values  as  EM  energy 
propagates  through  a  laterally  heterogeneous  atmospheric  medium  where  the  index  of 
refraction  is  allowed  to  vary  both  vertically  and  horizontally,  also  accounting  for  terrain 
effects  along  the  path  of  propagation.  Numerous  external  applications  require  EM-system 
propagation  loss  values.  The  APM  model  described  by  this  document  may  be  applied  to 
two  external  applications,  one  which  displays  propagation  loss  on  a  range  versus  height 
scale  (commonly  referred  to  as  a  coverage  diagram)  and  one  which  displays  propagation 
loss  on  a  propagation  loss  versus  range/height  scale  (commonly  referred  to  as  a  loss 
diagram). 


1.3  DOCUMENT  OVERVIEW 

This  document  describes  the  design  of  the  APM  CSCI.  An  overview  of  the  input 
software  requirements  is  presented  together  with  an  overview  of  the  CSCI  design 
architecture  and  a  detailed  design  description  of  each  component  of  the  CSCI. 
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3.  CSCI-WIDE  DESIGN  DECISIONS 

The  required  APM  CSCI  propagation  model  is  a  range-dependent  hybrid  model 
that  uses  the  complimentary  strengths  of  Ray  Optics  (RO)  and  Parabolic  Equation  (PE) 
techniques  to  calculate  propagation  loss  in  range  and  altitude. 

The  atmospheric  volume  is  divided  into  regions  that  lend  themselves  to  the 
application  of  the  various  propagation  loss  calculation  methods.  Figure  1  illustrates  these 
regions. 
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Figure  1.  APM  calculation  regions. 

For  antenna  elevation  angles  above  5°  or  for  ranges  less  than  approximately  2.5 
km,  a  flat-earth  (FE)  (RO)  model  is  used.  In  this  region,  only  receiver  height  is  corrected 
for  average  refraction  and  earth  curvature. 

Within  the  RO  region  (as  defined  by  a  limiting  ray),  propagation  loss  is  calculated 
from  the  mutual  interference  between  the  direct-path  and  surface-reflected  ray 
components  using  the  refractivity  profile  at  zero  range.  Full  account  is  given  to  focusing 
or  de-focusing  along  direct  and  reflected  ray  paths  and  to  the  integrated  optical  path 
length  difference  between  the  two  ray  paths,  to  give  precise  phase  difference,  and,  hence, 
accurate  coherent  sums  for  the  computation  of  propagation  loss. 

For  the  low-altitude  region  beyond  the  RO  region,  a  PE  approximation  to  the 
Helmholtz  full-wave  equation  is  employed.  The  PE  model  allows  for  range-dependent 
refractivity  profiles  and  variable  terrain  along  the  propagation  path  and  uses  a  split  step 
Fourier  method  for  the  solution  of  the  PE.  The  PE  model  is  run  in  the  minimum  region 
required  to  contain  all  terrain  and  trapping  layer  heights. 

For  the  area  beyond  the  RO  region  but  above  the  PE  region,  an  extended  optics 
region  (XO)  is  defined.  Within  the  XO  region,  RO  methods  that  are  initialized  by  the  PE 
solution  from  below,  are  used. 

APM  will  run  in  three  “execution”  modes,  depending  on  environmental  inputs. 
APM  will  use  the  FE,  RO,  XO,  and  PE  models  if  the  terrain  profile  is  flat  for  the  first  2.5 
km  and  if  the  antenna  height  is  less  than  or  equal  to  100  m.  It  will  use  only  the  XO  and 
PE  models  if  the  terrain  profile  is  not  flat  for  the  first  2.5  km  and  if  the  antenna  height  is 


less  than  or  equal  to  100  m.  For  applications  in  which  the  antenna  height  is  greater  than 
100  meters,  a  combination  of  FE  and  PE  methods  are  used.  The  FE  model  is  used  for  all 
propagation  angles  greater  than  ±5°  from  the  source  and  the  PE  model  is  used  for  angles 
within  ±5°.  By  default,  APM  will  automatically  choose  which  mode  of  operation  it  will 
use  for  a  specified  set  of  inputs.  However,  the  ability  to  run  only  the  PE  model  for  any 
case  is  allowed  by  setting  a  logical  flag  upon  input.  APM  will  automatically  run  only  the 
PE  algorithm  for  frequencies  less  than  50  MHz,  regardless  of  the  logical  flag  set  by  the 
user. 


The  APM  CSCI  allows  for  horizontal  and  vertical  antenna  polarization,  finite 
conductivity  based  on  user-specified  ground  composition  and  dielectric  parameters,  and 
the  complete  range  of  EM  system  parameters  and  most  antenna  patterns  required  by 
various  external  applications.  APM  also  allows  for  gaseous  absorption  effects  in  all  sub¬ 
models  and  computes  troposcatter  losses  within  the  diffraction  region  and  beyond. 

The  APM  CSCI  is  divided  into  5  main  computer  software  components  (CSC)  and 
67  additional  software  units  (SU).  The  first  CSC,  the  APMINIT  CSC,  interfaces  with 
various  SUs  for  the  complete  initialization  of  the  APM  CSCI.  The  second  CSC,  the 
APMSTEP  CSC,  advances  the  entire  APM  CSCI  algorithm  one  output  range  step, 
referencing  various  SUs  to  calculate  the  propagation  loss  at  the  current  output  range.  The 
Extended  Optics  Initilization  (XOINIT)  CSC  initializes  the  range,  height,  and  angle 
arrays  in  preparation  for  the  Extended  Optics  Step  (XOSTEP)  CSC,  and  also  computes 
and  returns  the  surface  clutter  values  if  requested.  The  fourth  CSC  (XOSTEP)  advances 
the  APM  CSCI  algorithm  one  output  step  from  the  top  of  the  PE  calculation  region  to  the 
maximum  output  height  specified,  referencing  various  SUs  to  calculate  the  propagation 
output  range.  Lastly,  the  RET  GRAZE  CSC  is  used  to  return  the  grazing  angles  for  use 
in  other  applications  outside  the  APM  CSCI  for  a  specified  set  of  environmental  inputs 
and  system  parameters. 


4.  CSCI  ARCHITECTURE  DESIGN 

4.1  CSCI  COMPONENTS 

The  APM  CSCI  is  accessed  by  a  subroutine  call  which  provides,  as  global  data 
elements,  the  values  specified  in  Table  1  through  Table  4.  The  source  code  for  the  APM 
CSCI  is  listed  in  Appendix  A.  The  name  and  purpose  for  each  CSC  and  SU  are  listed 
below. 


The  Advance  Propagation  Initialization  (APMINIT)  CSC  interfaces  with  various 
SUs  for  the  complete  initialization  of  the  APM  CSCI. 
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The  APMINIT  CSC  component  SUs  include  the  following: 


1.  Allocate  Arrays  APM  (ALLARRAY_APM)  SU.  Allocates  and  initializes  all 
dynamically  dimensioned  arrays  associated  with  APM  terrain,  refractivity, 
troposcatter,  and  general  variable  arrays. 

2.  Allocate  Array  PE  (ALLARRAY_PE)  SU.  Allocates  and  initializes  all  dynamically 
dimensioned  arrays  associated  with  PE  calculations. 

3.  Allocate  Array  RO  (ALLARRAY_RO)  SU.  Allocates  and  initializes  all  dynamically 
dimensioned  arrays  associated  with  RO  calculations. 

4.  Allocate  Array  XO  (ALLARRAY_XORUF)  SU.  Allocates  and  initializes  all 
dynamically  dimensioned  arrays  associated  with  XO  and  rough  surface  calculations. 

5.  Alpha  Impedance  Initialization  (ALNJNIT)  SU.  Initializes  variables  used  in  the 
Discrete  Mixed  Fourier  Transform  (DMFT)  algorithm  for  finite  conductivity  and/or 
rough  surface  calculations. 

6.  Antenna  Pattern  (ANTPAT)  SU.  Calculates  a  normalized  antenna  gain  (antenna 
pattern  factor)  for  a  specified  antenna  elevation  angle. 

7.  APM  Status  (APMSTATUS)  SU.  Declared  as  an  external  subroutine  within  the  main 
driver  program.  Used  only  for  accessing  status  of  grazing  angle  routine. 

8.  Dielectric  Initialization  (DIEINIT)  SU.  Determines  the  conductivity  and  relative 
pennittivity  as  a  function  of  frequency  (MHz)  based  on  general  ground  composition 
types. 

9.  FFT  Parameters  (FFTPAR)  SU.  Detennines  the  required  transform  size  based  on  the 
maximum  PE  propagation  angle  and  the  maximum  height  needed. 

10.  Fill  Height  Arrays  (FILLHT)  SU.  Calculates  the  effective  earth  radius  for  an  initial 
launch  angle  of  5°  and  fills  an  array  with  height  values  at  each  output  range  of  the 
limiting  sub-model,  depending  on  which  mode  is  used. 

11.  Gaseous  Absorption  (GASABS)  SU.  Computes  the  specific  attenuation  based  on  air 
temperature  and  absolute  humidity. 

12.  Get  Effective  Earth  Radius  Factor  (GET_K)  SU.  Computes  the  effective  earth 
radius  factor  and  the  effective  earth  radius. 


6 


13.  Get  Alpha  Impedance  (GETALN)  SU.  Computes  the  impedance  term  in  the 
Leontovich  boundary  condition  and  the  complex  index  of  refraction  for  finite 
conductivity  and  vertical  polarization  calculations. 

14.  Get  Angles  (GETANGLES)  SU.  Computes  grazing  angles  for  use  in  subsequent 
rough  surface  calculations,  and  if  necessary,  also  the  propagation  angles  for  output 
via  APMSTEP. 

15.  Get  Maximum  Angle  (GETTHMAX)  SU.  Performs  an  iterative  ray  trace  to  determine 
the  minimum  angle  required  (based  on  the  reflected  ray)  in  obtaining  a  PE  solution. 

16.  Grazing  Angle  Interpolation  (GRAZE_INT)  SU.  Interpolates  grazing  angles  at  each 
PE  range  step  based  on  angles  computed  from  ray  trace  (takes  precedence)  and  those 
computed  from  spectral  estimation. 

17.  Height  Check  (HTCHECK)  SU.  Checks  if  the  current  traced  ray  height  is  below  the 
current  ground  height. 

18.  Interpolate  Profile  (INTPROF)  SU.  Performs  a  linear  interpolation  vertically  with 
height  on  the  refractivity  profile. 

19.  PE  Initialization  (PEINIT)  SU.  Initializes  all  variables  used  in  the  PE  model  for 
subsequent  calls  to  the  PESTEP  SU 

20.  Poly  4  (FN_POLY4)  Function.  Evaluates  a  fourth  degree  polynomial. 

21.  Poly  5  (FN_POLY5)  Function.  Evaluates  a  fifth  degree  polynomial. 

22.  Profile  Reference  (PROFREF)  SU.  Adjusts  the  current  refractivity  profile  so  that  it 
is  relative  to  a  reference  height. 

23.  Refractivity  Initialization  (REFINIT)  SU.  Checks  for  valid  environmental  profile 
inputs  and  initializes  refractivity  arrays. 

24.  Remove  Duplicate  Refractivity  Levels  (REMDUP)  SU.  Removes  any  duplicate 
refractivity  levels  in  the  currently  interpolated  profile. 

25.  RG  Trace  (RGTRACE)  SU.  Performs  ray  trace  over  terrain  of  many  rays  launched 
within  an  angle  of  ±1.5°,  storing  grazing  angles  from  these  rays. 

26.  Terrain  Initialization  (TERINIT)  SU.  Examines  and  initializes  terrain  arrays  for 
subsequent  use  in  PE  calculations. 
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27.  Trace  to  Output  Range  (TRACE_ROUT)  SU.  Traces  a  single  ray,  whose  launch 
angle  is  specified  by  the  calling  routine,  to  each  output  range. 

28.  Trace  to  next  Step  (TRACE_STEP)  SU.  This  routine  performs  one  ray  trace  step. 
When  passed  a  starting  angle,  range,  and  height  for  a  single  ray,  it  will  trace  to  the 
first  boundary  that  occurs  (refractivity  level  or  surface).  It  then  passes  back  the  ending 
angle,  range  and  height,  and  a  flag  indicating  if  the  ray  has  hit  the  surface. 

29.  Troposcatter  Initialization  (TROPOINIT)  SU.  Initializes  all  variables  and  arrays 
needed  for  subsequent  troposcatter  calculations. 

30.  Starter  Field  Initialization  (XYINIT)  SU.  Calculates  the  complex  PE  solution  at  range 
zero. 

The  Advanced  Propagation  Model  Step  (APMSTEP)  CSC  advances  the  entire 

APM  CSCI  algorithm  one  output  range  step,  referencing  various  SUs  to  calculate  the 

propagation  loss  at  the  current  output  range.  The  APMSTEP  CSC  component  SUs 

include  the  following: 

1.  Calculate  Propagation  Loss  (CALCLOS)  SU.  Determines  propagation  loss  from 
the  complex  PE  field  at  each  output  height  point  at  the  current  output  range. 

2.  Current  Wind  (FN_CURWIND)  Function.  Performs  a  linear  interpolation  in  range  to 
get  the  current  wind  speed  at  the  specified  range. 

3.  Dielectric  Constant  (FN_DIECON)  Function.  Extracts  the  stored  complex  dielectric 
constant  at  a  particular  range. 

4.  DOSHIFT  SU.  Shifts  the  field  by  the  number  of  bins,  or  PE  mesh  heights 
corresponding  to  the  local  ground  height. 

5.  Discrete  Sine/Cosine  Fast-Fourier  Transform  (DRST)  SU.  Performs  a  sine  or 
cosine  transform,  depending  on  the  value  of  an  integer  flag  provided  by  the  calling 
SU,  on  both  the  real  and  imaginary  components  of  the  PE  field,  which  are  passed 
separately. 

6.  Flat  Earth  Direct  Ray  (FEDR)  SU.  Detennines  the  propagation  loss  based  on  FE 
calculations  for  the  direct  ray  only,  for  all  output  heights  specified  at  each  output 
range. 

7.  Flat  Earth  Model  (FEM)  SU.  Computes  propagation  loss  at  a  specified  range  based 
on  FE  approximations. 


8.  Fast-Fourier  Transform  (FFT)  SU.  Separates  the  real  and  imaginary  components  of 
the  complex  PE  field  into  two  real  arrays  and  then  references  the  DRST  SU. 

9.  Free  Space  Range  Step  (FRSTP)  SU.  Propagates  the  complex  PE  solution  field  in 
free  space  by  one  range  step. 

10.  FZLIM  SU.  Determines  the  propagation  factor  (in  dB)  and  the  outgoing  propagation 
angle  at  the  top  of  the  PE  calculation  region. 

11.  Get  Propagation  Factor  (FN_GETPFAC)  Function.  Detennines  the  propagation 
factor  at  the  specified  height  in  decibels. 

12.  Get  Reflection  Coefficient  (GETREFCOEF)  SU.  Calculates  the  complex  surface 
reflection  coefficient,  along  with  the  Miller-Brown  rough  surface  reduction  factor. 

13.  Get  Troposcatter  Loss  (FN_GET_TLOSS)  Function.  Detennines  the  loss  due  to 
troposcatter  and  computes  the  appropriate  loss  from  troposcatter  and  diffraction  for  a 
specific  transmitter  and  receiver  point  over  land  and  water. 

14.  Linear  Interpolation  (FN_PLINT)  Function.  Performs  linear  interpolation  on  two 
input  parameters  passed  to  the  function. 

15.  Mixed  Fourier  Transform  (MIXEDFT)  SU.  Propagates  the  PE  field  in  free  space  one 
PE  range  step,  applying  the  Leontovich  boundary  condition,  using  the  mixed  Fourier 
transform  as  outlined  by  Kuttler  and  Dockery  (1991). 

16.  Parabolic  Equation  Step  (PESTEP)  SU.  Determines  the  next  output  range  and 
begins  an  iterative  loop  to  advance  the  PE  solution  such  that  for  the  current  PE  range, 
a  PE  solution  is  calculated  from  the  solution  at  the  previous  PE  range.  This  procedure 
is  to  be  repeated  until  the  output  range  is  reached. 

17.  Ray  Trace  (RAYTRACE)  SU.  Traces  a  ray  from  a  starting  height  and  range  with  a 
specified  starting  elevation  angle  to  a  termination  range. 

18.  Refractivity  Interpolation  (REFINTER)  SU.  Interpolates  horizontally  and  vertically 
on  the  modified  refractivity  profiles. 

19.  Ray  Optics  Calculation  (ROCALC  SU).  Computes  the  RO  components  that  will  be 
needed  in  the  calculation  of  propagation  loss  at  a  specified  range  and  height  within 
the  RO  region. 
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20.  Ray  Optics  Loss  (ROLOSS)  SU.  Calculates  the  propagation  loss  and  propagation 
factor  values  at  a  specified  range  and  height  based  upon  the  components  of  magnitude 
for  a  direct-path  and  surface-reflected  ray  and  the  total  phase  lag  angle  between  the 
two  rays  as  determined  by  the  ROCALC  SU. 

21.  Save  Profile  (SAVEPRO)  SU.  Stores  the  refractivity  profiles  at  each  PE  range  step 
from  the  top  of  the  PE  region  to  the  maximum  user-specified  height. 

22.  Spectral  Estimation  (SPECEST)  SU.  Determines,  via  spectral  estimation,  the 
outward  propagation  angle  at  the  top  of  the  PE  calculation  region. 

23.  Surface  Impedance  (SURFIMP)  SU.  Computes  the  nonnalized  average  surface 
impedance  for  surface  wave  propagation  by  vertically  polarized  waves  along  the  sea 
surface  for  frequencies  less  than  50  MHz. 

24.  Troposcatter  (TROPOSCAT)  SU.  Determines  the  loss  due  to  troposcatter  and 
computes  the  appropriate  loss  from  troposcatter  and  diffraction  beyond  the  radio 
horizon  for  an  array  of  receiver  heights. 

The  XOINIT  CSC  initializes  the  range,  height,  and  angle  arrays  in  preparation  for 

the  XOSTEP  CSC.  It  also  accesses  the  surface  clutter  computation  SUs  and  returns  the 

surface  clutter,  if  specified  by  the  user.  The  XOINIT  CSC  component  SUs  include  the 

following: 

1.  Advanced  Propagation  Model  Clean  (APMCLEAN)  SU.  Deallocates  all 
dynamically  dimensioned  arrays  used  in  one  complete  run  of  APM  calculations. 

2.  Clutter-to-Noise  (CLUTTER)  SU.  Calculates  returned  clutter-to-noise  ratio  at  each 
output  range. 

3.  Diffraction  Loss  (FN_DLOSS)  Function.  Computes  loss  in  the  diffraction  region 
based  on  the  CCIR  model. 

4.  Get  Theta  (GETTHETA)  SU.  Calculates  the  optical  phase-lag  difference  angle  from 
the  reflection  range  found  in  the  R1ITER  SU. 

5.  GIT  Initialization  (GITJNIT)  SU.  Initializes  all  variables  used  in  the  calculation  of 
the  reflectivity  based  on  a  modified  version  of  the  GIT  model. 

6.  GofZ  (GOFZ)  Function.  Calculates  the  diffraction  region  height-gain  in  decibels 
from  the  CCIR  diffraction  region  model. 


10 


7.  Mean  Filter  (MEANFILT)  SU.  Performs  an  n-point  average  smoothing  on  any  array 
passed  to  it. 

8.  Optical  Region  Limit  (OPLIMIT)  SU.  Calculates  the  maximum  range  in  the  optical 
interference  region  and  the  corresponding  loss  at  that  range. 

9.  Optical  Difference  (OPTICF)  SU.  Calculates  the  optical  path-length  difference  angle 
by  solving  a  cubic  equation  for  the  reflection  point  range. 

10.  R1  Iteration  (R1ITER)  SU.  Finds  the  range  of  the  reflection  point  corresponding  to  a 
particular  launch  angle. 

11.  Standard  Propagation  Model  Initialization  (SPM_INIT)  SU.  Initializes  much  of  the 
variables  used  throughout  the  SPM  SU. 

12.  Standard  Propagation  Model  (SPM)  SU.  Computes  the  propagation  factor  for  a 
standard  atmosphere  only,  with  the  assumption  of  omni-directional  antenna  patterns. 

The  XOSTEP  CSC  advances  the  APM  CSCI  algorithm  one  output  range  step 
from  the  top  of  the  PE  calculation  region  to  the  maximum  output  height  specified, 
referencing  various  SUs  to  calculate  the  propagation  loss  at  the  current  output  range.  The 
XOSTEP  CSC  component  SUs  include  the  following: 

1.  Extended  Optics  (EXTO)  SU.  Calculates  propagation  loss  and  propagation  factor, 
based  on  extended  optics  techniques,  at  the  current  output  range. 

The  Return  Grazing  Angles  (RET  GRAZE)  CSC  interpolates  grazing  angles  to 
every  output  range  step,  and  if  necessary,  will  interpolate  the  propagation  angles  in  height 
at  every  output  range. 


4.2  CONCEPT  OF  EXECUTION 

The  program  flow  of  the  APM  CSCI  is  illustrated  in  Figure  2.  Note  that  the  APM 
CSCI  is  shown  within  the  context  of  a  calling  CSCI  application  such  as  one  that 
generates  a  coverage  or  loss  diagram.  The  efficient  implementation  of  the  APM  CSCI 
will  have  far  reaching  consequences  on  the  design  of  an  application  CSCI  beyond  those 
mentioned  in  Section  7.1.  For  example,  Figure  2  shows  checking  for  the  existence  of  a 
previously  created  APM  output  file  prior  to  the  access  of  the  APM  CSCI.  The  application 
CSCI  must  consider  if  the  atmospheric  or  terrain  environment  has  changed  since  the 
APM  output  file  was  created  or  if  any  new  height  or  range  requirement  is  accommodated 
within  the  existing  APM  CSCI  output  file.  Because  these  and  many  more  considerations 
are  beyond  the  scope  of  this  document,  an  application  CSCI  designer  should  work  closely 
with  the  APM  CSCI  development  agency  in  the  implementation  of  the  APM  CSCI. 
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Figure  2.  APM  CSCI  program  flow. 


4.3  INTERFACE  DESIGN 

4.3.1  Interface  Identification  and  Diagrams 

The  APM  CSCI  interface  design  consists  of  one  FORTRAN  MODULE  file  for 
the  external  and  internal  data  interface,  FORTRAN  CALL  statements  for  output  data  and 
internal  interfacing,  and  several  FORTRAN  COMMON  blocks  for  the  internal  interface. 
The  MODULE  file  is  called  APM  MOD.  This  MODULE’S  statements  provide  several 
constants,  COMMON  blocks,  and  the  dynamically  allocated  array  names.  The 
COMMON  block  names  are  (1)  APM  VAR,  (2)  ERRORFLAG,  (3)  INPUTVAR, 
(4)  REFRACTIVITY,  (5)  SYSTEMVAR,  and  (6)  TERRAIN. 

4.3.2  External  Interface 

The  APM  CSCI  is  accessed,  through  the  APMINIT  CSC,  by  a  subroutine  call 
from  the  external  CSCI,  which  should  provide,  as  global  data  elements,  the  values 
specified  in  Table  1  through  Table  4. 

The  APM  CSCI  external  data  elements,  i.e.  those  data  which  must  be  provided  by 
the  calling  CSCI  in  the  MODULE  file  prior  to  the  APM  CSCI  execution  can  be  divided 
into  four  classifications.  The  first  classification  is  external  data  related  to  the  atmospheric 
environment  (Table  1),  the  second  is  data  related  to  the  EM  system  (Table  2),  the  third  is 
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data  related  to  the  implementation  of  the  APM  CSCI  by  the  external  CSCI  (Table  3),  and 
the  fourth  is  data  related  to  the  terrain  information  (Table  4).  Each  table  lists  the  type, 
units,  and  bounds  of  each  data  element.  Table  5  specifies  the  output  data  of  the  APM 
CSCI  model  passed  back  to  the  calling  CSCI  via  the  FORTRAN  CALL  statements. 


Table  1.  APM  CSCI  environmental  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

refinsl 

Modified  refractivity  profile  (dynamically 
allocated)  array  referenced  to  mean  sea  level 

real 

M 

>0.0a 

hmsl 

Profile  height  (dynamically  allocated)  array 

real 

meters 

See  note  b 

W- prof 

Number  of  refractivity  profiles 

integer 

N/A 

>  1 

Ivlp 

Number  of  profile  levels 

integer 

N/A 

>2 

rngprof 

Dynamically  allocated  array  of  ranges  to  each 
profile 

real 

meters 

>0.0 

uh.S  Inim 

Surface  absolute  humidity 

real 

g/m3 

0  to  50c 

tair 

Surface  air  temperature 

real 

°C 

-20  to  40L 

Ya 

Surface  specific  attenuation 

real 

dB/km 

>0.0 

l  extra 

Extrapolation  flag  for  refractivity  profiles 
entered  in  combination  with  terrain  below 
mean  sea  level 

integer 

N/A 

0  or  1 

ftw 

Number  of  wind  speeds  and  corresponding 
ranges 

integer 

N/A 

>0.0 

rngwind 

Dynamically  allocated  array  of  ranges 
specified  for  each  wind  speed  in  windQ. 

real 

meters 

>0.0 

wind 

Dynamically  allocated  array  of  wind  speeds. 

real 

meters/ 

second 

0.0  to  20. 0d 

winder 

Angle  between  antenna  boresight  and  upwind 
direction 

real 

degrees 

0.0  to  360.0 

aCouplets  of  height  and  modified  refractivity  associated  with  that  height  are  referred  to  in  this  document  as  a 
refractivity  profile. 

bAll  heights  in  the  refractivity  profile  must  be  steadily  increasing. 

cThe  CCIR  gaseous  absorption  model  implemented  within  APM  provides  a  ±15%  accuracy  for  absolute  humidity 
and  surface  air  temperature  within  these  bounds.  While  values  beyond  these  limits  are  allowed  within  APM, 
Note  that  this  may  result  in  less  accurate  attenuation  rates  calculated. 
dThe  maximum  wind  speed  will  vary  depending  on  frequency.  For  frequencies  less  than  10  GHz,  the  maximum 
that  can  be  specified  is  20  m/s.  Above  10  GHz,  the  maximum  wind  speed  that  can  be  specified  will  decrease  to 
an  absolute  maximum  of  15  m/s  at  20  GHz  and  above. 
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Table  2.  APM  CSCI  external  EM  system  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

Mbw 

Antenna  vertical  beam  width 

real 

degree 

0.5  to  45 

Mo 

Antenna  elevation  angle 

real 

degree 

-10.0  to  10.0 

Qut 

Logical  flag  used  to  indicate  if  surface  clutter 
calculations  are  desired. 

logical 

N/A 

‘.true.’  or  ‘.false.’ 

J MHz 

EM  system  frequency 

real 

MHz 

2.0  to  20,000. 0a 

Ipat 

Antenna  pattern 

1  =  Omnidirectional 

2  =  Gaussian 

3  =  Sine  (X)/X 

4  =  Cosecant-squared 

5  =  Generic  height-finder 

6  =  User-defined  height-finder 

7  =  User-defined  antenna  pattern 

8  =  Quarter-wave  dipole 

integer 

N/A 

1  to  8 

Ipol 

Antenna  polarization 

0  =  Horizontal 

1  =  Vertical 

integer 

N/A 

Oto  1 

G 

Gain  of  transmit/receive  antennas 

real 

dBi 

>  0.0 

antht 

Antenna  height  above  local  ground  at  range  0.0  m 

real 

meters 

>  1.5b 

hfang 

Dynamically  allocated  user-defined  height-finder 
power  reduction  angle  array  (ipa,= 6)  or  antenna 
pattern  angles  (ipa,=l) 

real 

degree 

0.0  to  90.0  for  ipai=6 
-90.0  to  90.0  for 

ipat  7 

hffac 

Dynamically  allocated  user-defined  power 
reduction  factor  array  (ipat=6)  or  antenna  pattern 
factors  (ipa,= 7) 

real 

N/A 

0.0  to  1.0 

Lsys 

Miscellaneous  system  losses 

real 

dB 

>  0.0 

@hbw 

Antenna  horizontal  beam  width 

real 

degrees 

0.5  to  45 

nj'acs 

Number  of  power  reduction  angles/factors  for  user- 
defined  height  finder  antenna  pattern 

integer 

N/A 

1  to  10 

Nf 

Noise  figure 

real 

dB 

>  0.0 

P, 

Transmitter  peak  power 

real 

kW 

>  0.1 

T 

Pulse  length/width 

real 

psec 

>  0.1 

“The  frequency  can  be  specified  greater  than  20  GHz;  however,  the  PEjlaf, must  be  set  to  ‘.true.’  and 
care  must  be  taken  in  specifying  thmax  and  rmuh. 

bThe  minimum  antenna  height  will  vary,  depending  on  the  frequency  and  beamwidth  according  to  the 
formula: 


antht  >  maximum  of 


1.5, 0.6 


f  MHz  Mb 


'W  J 


where  ca  is  the  speed  of  light  x  10'6  m/s  (299.79245). 


14 


Table  3.  APM  CSCI  external  implementation  constants. 


Name 

Description 

Type 

Units 

Bounds 

h  max 

Maximum  height  output  for  a  particular  application  of 
APM 

real 

meters 

>  ioo.oa 

h  min 

Minimum  height  output  for  a  particular  application  of 
APM 

real 

meters 

>o.oa 

lang 

Propagation  angle  and  factor  output  flag 

‘.tme.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and 
factors 

logical 

N/A 

‘.true.’  or 
‘. false. ,b 

lerr6 

Logical  flag  to  allow  for  error  -6  to  be  bypassed 

logical 

N/A 

‘.true.’  or 
‘.false.’0 

lerrl2 

Logical  flag  to  allow  for  error  -12  to  be  bypassed 

logical 

N/A 

‘.true.’  or 
‘.false.’0 

ftrout 

Number  of  range  output  points  for  a  particular 
application  of  APM 

integer 

N/A 

>1 

ft zout 

Number  of  height  output  points  for  a  particular 
application  of  APM 

integer 

N/A 

>1 

ftzout_rtg 

Number  of  height  output  points  for  receiver  heights 
relative  to  the  local  ground  elevation. 

integer 

N/A 

>0 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

logical 

N/A 

‘.true.’  or 

‘.false.’ 

ft max 

Maximum  range  output  for  a  particular  application  of 
APM 

real 

meters 

>  5000.0° 

ft mult 

PE-range  step  multiplier 

real 

N/A 

>0.0° 

th 

1,1  max 

Visible  portion  of  PE  maximum  calculation  angle 

real 

degrees 

>  0.0° 

T 

1  ropo 

Logical  flag  to  include  troposcatter  calculations. 

integer 

N/A 

‘.true.’  or 
‘.false.’ 

zout_rtg 

Dynamically  allocated  array  of  receiver  heights 
specified  relative  to  the  local  ground  height. 

real 

meters 

>0.0 

a 

Refer  to  section  7.2  for  a  complete  description. 

bThis  flag  should  not  be  enabled  when  any  portion  of  the  propagation  path  is  over  land. 

e 

Refer  to  section  4.3.4  for  a  complete  description. 
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Table  4.  APM  CSCI  external  terrain  data  element  requirements. 


Name 

Description 

Type 

Units 

Bounds 

terx 

Dynamically  allocated  terrain  profde  range  array 

real 

meters 

>0.0a 

ten > 

Dynamically  allocated  terrain  profde  height  array 

real 

meters 

>o.oa 

yc 

Dynamically  allocated  array  of  constants  describing 
the  backscattering  effectiveness  of  the  surface 

real 

dB 

-100.0  <  yc 
<  100.0 

yrng 

Dynamically  allocated  array  of  ranges  corresponding 
to  the  values  in  yc 

real 

meters 

>0.0 

Igc 

Number  of  yc  values  for  a  particular  application  of 
APM 

integer 

N/A 

>0 

hp 

Number  of  terrain  profde  points  for  a  particular 
application  of  APM 

integer 

N/A 

>2 

lgr 

Number  of  ground  types  for  a  particular  application 
of  APM 

integer 

N/A 

>oa 

igrnd 

Array  of  ground  composition  types  for  a  particular 
application  of  APM 

0  =  Sea  water 

1  =  Fresh  water 

2  =  Wet  ground 

3  =  Medium  dry  ground 

4  =  Very  dry  ground 

5  =  Ice  at  -1°  C 

6  =  Ice  at  -10°  C 

7  =  User-defined 

integer 

N/OA 

0  <  igrnd  < 

7a 

rgrnd 

Dynamically  allocated  array  of  ranges  for  which 
ground  types  are  applied  for  a  particular  application 
of  APM 

real 

meters 

>0.0a 

dielec 

Dynamically  allocated  two-dimensional  array  of 
relative  permittivity  (e,  )  and  conductivity  (a)  for  a 
particular  application  of  APM 

real 

£,.  -  N/A 

G- 

Siemens/ 

meter 

>oa 

“refer  to  section  7.3  for  a  complete  description 
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Table  5.  APM  CSCI  output  data  element  requirements. 


Name 

Description 

Type 

Units 

Source 

CNR 

Clutter-to-Noise  ratio  array 

real 

dB 

XOINIT  CSC 

u/ 

J  rout 

Array  of  grazing  angles  at  each  output 
range  rout 

real 

radians 

RET  GRAZE  SU 

terror 

Integer  value  that  is  returned  if  an  error 
occurs  in  called  routine 

integer 

N/A 

APMINIT  CSC 

RET  GRAZE  SU 
XOINIT  CSC 

t-xostp 

Index  of  output  range  step  at  which  XO 
model  is  to  be  applied 

integer 

N/A 

APMINIT  CSC 

J  end 

Output  height  index  at  which  valid 
propagation  loss  values  end 

integer 

N/A 

APMSTEP  CSC 

J  start 

Output  height  index  at  which  valid 
propagation  loss  values  begin 

integer 

N/A 

APMSTEP  CSC 

Jxend 

Output  height  index  at  which  valid  XO 
propagation  loss  values  end 

integer 

N/A 

XOSTEP  CSC 

Jxstart 

Output  height  index  at  which  valid  XO 
propagation  loss  values  begin 

integer 

N/A 

XOINIT  CSC 

^ graze 

Logical  flag  indicating  if  grazing  angles 
were  computed  for  a  particular 
application  of  APM 

logical 

N/A 

APMINIT  CSC 

mpfl 

Propagation  loss  and  factor  array 

integer 

cB 

APMSTEP  CSC 
XOSTEP  CSC 

mpflrtg 

Propagation  loss  and  factor  at  receiver 
heights  specified  in  the  zout  rtg  array 

integer 

cB 

APMSTEP  CSC 

propaf 

Two-dimensional  array,  containing  the 
propagation  angles  and  factors  for  the 
direct  and  reflected  rays  (where 
applicable)  for  all  output  height/range 
points 

real 

radians.dB 

APMSTEP  CSC 

XOSTEP  CSC 

V  out 

Current  output  range 

real 

meters 

APMSTEP  CSC 
XOSTEP  CSC 

4.3.3  internal  Interface 

Section  4.2  shows  the  relationship  between  the  APM  CSCI  and  its  five  main 
CSCs:  APMINIT,  AMPSTEP,  RETGRAZE,  XOINIT,  and  XOSTEP.  This  relationship 
is  illustrated  in  Figure  2.  The  internal  interface  between  these  five  CSCs  and  the  APM 
CSCI  is  left  to  the  design.  However,  the  internal  structure  of  the  APM  CSCI  and  its  CSCs 
and  SUs  is  shown  in  Table  6.  The  left  two  columns  show  the  calling  subroutines,  and  the 
right  two  columns  the  subroutines  called.  Columns  2  and  4  in  Table  6  give  the  section 
number  in  Section  5  where  more  details  about  the  various  CSCs  and  SUs  of  the  APM 
CSCI  can  be  found. 
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Table  6.  APM  internal  interface  design. 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

CSCI  Detailed  Design 

5 

Advance  Propagation 

Initialization  (APMINIT)  CSC 

5.1 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Allocate  Arrays  APM 
(ALLARRAY_APM)  SU 

5.1.1 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Allocate  Array  RO 
(ALLARRAY  RO)  SU 

5.1.3 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Allocate  Array  XORUF  (XORUF) 
SU 

5.1.4 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Alpha  Impedance  Initialization 
(ALNJNIT)  SU 

5.1.5 

Alpha  Impedance  Initialization 
(ALNJNIT)  SU 

5.1.5 

Get  Alpha  Impedance  (GETALN) 
SU 

5.1.13 

Get  Alpha 

Impedance(GETALN)  SU 

5.1.13 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Alpha 

Impedance(GETALN)  SU 

5.1.13 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Get  Alpha 

Impedance(GETALN)  SU 

5.1.13 

Surface  Impedance  (SURFIMP) 

SU 

5.2.23 

Surface  Impedance 
(SURFIMP)  SU 

5.2.23 

Poly  4  (FN_POLY4)  Function 

5.1.20 

Surface  Impedance 
(SURFIMP)  SU 

5.2.23 

Poly  5  (FN  POLY5)  Function 

5.1.21 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Dielectric  Initialization  (DIEINIT) 

SU 

5.1.8 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

FFT  Parameters  (FFTPAR)  SU 

5.1.9 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Fill  Height  Arrays  (FILLHT)  SU 

5.1.10 

Fill  Height  Arrays  (FILLHT)  SU 

5.1.10 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

5.1.27 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Fill  Height  Arrays  (FILLHT) 

SU 

5.1.10 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

5.1.28 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

5.1.28 

Height  Check  (HTCHECK) 

SU 

5.1.17 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Gaseous  Absorption 
(GASABS)  SU 

5.1.11 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Get  Effective  Earth  Radius 
Factor  (GET  K)  SU 

5.1.12 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

APM  Status  (APMSTATUS) 

SU 

5.1.7 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

DOSHIFTSU 

5.2.2 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Fast  Fourier  Transform  (FFT) 
SU 

5.2.8 

Fast  Fourier  Transform 
(FFT)  SU 

5.2.8 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

5.2.5 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Interpolate  Profile  (INTPROF) 
SU 

5.1.18 

Interpolate  Profile 
(INTPROF)  SU 

5.1.18 

Linear  Interpolation 
(FN_PLINT)  Function 

5.2.14 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Profile  Reference 
(PROFREF)  SU 

5.1.22 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Remove  Duplicate 

Refractivity  Levels 
(REMDUP)  SU 

5.1.24 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

RG  Trace  (RGTRACE)  SU 

5.1.25 

RG  Trace  (RGTRACE)  SU 

5.1.25 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

5.1.28 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD  Paragraph 
Number 

Software  Design  Description 
Name 

SDD  Paragraph 
Number 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

5.1.28 

Height  Check  (HTCHECK) 

SU 

5.1.17 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

Spectral  Estimation 
(SPECEST)  SU 

5.2.22 

Spectral  Estimation 
(SPECEST)  SU 

5.2.22 

Discrete  Sine/Cosine 
Transform  (DRST)  SU 

5.2.5 

Get  Angles  (GETANGLES) 

SU 

5.1.14 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

5.1.27 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Get  Maximum  Angle 
(GETTHMAX)  SU 

5.1.15 

Get  Maximum  Angle 
(GETTHMAX)  SU 

5.1.15 

FFT  Parameters  (FFTPAR) 
SU 

5.1.9 

Get  Maximum  Angle 
(GETTHMAX)  SU 

5.1.15 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

5.1.27 

Advance  Propagation 
Initialization  (APMinit)  CSC 

5.1 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

5.1.16 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

5.1.16 

Linear  Interpolation 
(FN_PLINT)  Function 

5.2.14 

Advance  Propagation 
Initialization  (APMinit)  CSC 

5.1 

PE  Initialization  (PEINIT) 

SU 

5.1.19 

PE  Initialization  (PEINIT)SU 

5.1.19 

Allocate  Array  PE 
(ALLARRAY  PE)  SU 

5.1.2 

PE  Initialization  (PEINIT)SU 

5.1.19 

Interpolate  Profile 
(INTPROF)  SU 

5.1.18 

PE  Initialization  (PEINIT)SU 

5.1.19 

Starter  Field  Initialization 
(XYINIT)  SU 

5.1.30 

Starter  Field  Initialization 
(XYINIT)  SU 

5.1.30 

Antenna  Pattern  (ANTPAT) 
SU 

5.1.6 

Starter  Field  Initialization 
(XYINIT)  SU 

5.1.30 

Discrete  Sine/Cosine 
Transform  (DRST)  SU 

5.2.5 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Profile  Reference 
(PROFREF)  SU 

5.1.22 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Refractivity  Initialization 
(REFINIT)  SU 

5.1.23 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Refractivity  Initialization 
(REFINIT)  SU 

5.1.23 

Profile  Reference 
(PROFREF)  SU 

5.1.22 

Refractivity  Initialization 
(REFINIT)  SU 

5.1.23 

Remove  Duplicate 

Refractivity  Levels  (RemDup) 
SU 

5.1.24 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Remove  Duplicate 

Refractivity  Levels  (RemDup) 
SU 

5.1.24 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Terrain  Initialization 
(TERINIT)  SU 

5.1.26 

Advance  Propagation 
Initialization  (APMINIT)  CSC 

5.1 

Troposcatter  Initialization 
(TROPOINIT)  SU 

5.1.28 

Troposcatter  Initialization 
(TROPOINIT)  SU 

5.1.28 

Antenna  Pattern(Antpat)  SU 

5.1.6 

Troposcatter  Initialization 
(TROPOINIT)  SU 

5.1.28 

Get  Effective  Earth  Radius 
Factor  (GET  K)  SU 

5.1.12 

CSCI  Detailed  Design 

5 

Advance  Propagation  Model 
Step  (APMSTEP)  CSC 

5.2 

Advance  Propagation  Model 
Step  (APMSTEP)  CSC 

5.2 

Flat  Earth  Direct  Ray  (FEDR) 
SU 

5.2.6 

Flat  Earth  Direct  Ray  (FEDR) 
SU 

5.2.6 

Antenna  Pattern(Antpat)  SU 

5.1.6 

Advance  Propagation  Model 
Step  (APMSTEP)  CSC 

5.2 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Antenna  Pattern  (Antpat)  SU 

5.1.6 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind 
(FN_CURWIND)  Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Advance  Propagation  Model 
Step  (APMSTEP)  CSC 

5.2 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

5.2.1 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

5.2.1 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

5.2.11 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

5.2.1 

Linear  Interpolation 
(FN  PLINT)  Function 

5.2.14 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

5.2.1 

Troposcatter  (TROPOSCAT) 
SU 

5.2.24 

Troposcatter  (TROPOSCAT) 
SU 

5.2.24 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

5.2.13 

Get  Troposcatter  Loss 
(FN  GET  TLOSS)  Function 

5.2.13 

Antenna  Pattern  (ANTPAT) 

SU 

5.1.6 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

DOSHIFTSU 

5.2.4 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Fast-Fourier  Transform  (FFT) 
SU 

5.2.8 

Fast-Fourier  Transform  (FFT) 
SU 

5.2.8 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

5.2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

FZLIM  SU 

5.2.10 

FZLIM  SU 

5.2.10 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

5.2.11 

FZLIM  SU 

5.2.10 

Save  Profile  (SAVEPRO)  SU 

5.2.21 

FZLIM  SU 

5.2.10 

Spectral  Estimation 
(SPECEST)  SU 

5.2.22 

Spectral  Estimation 
(SPECEST)  SU 

5.2.22 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

5.2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Get  Alpha  Impedance 
(GETALN)  SU 

5.1.13 

Get  Alpha  Impedance 
(GETALN)  SU 

5.1.13 

Current  Wind 
(FN_CURWIND)  Function 

5.2.2 

Get  Alpha  Impedance 
(GETALN)  SU 

5.1.13 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind 
(FN_CURWIND)  Function 

5.2.2 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Get  Alpha 

Impedance(GETALN)  SU 

5.1.13 

Surface  Impedance 
(SURFIMP)  SU 

5.2.23 

Surface  Impedance 
(SURFIMP)  SU 

5.2.23 

Poly  4  (FN_POLY4) 

Function 

5.1.20 

Surface  Impedance 
(SURFIMP)  SU 

5.2.23 

Poly  5  (FN  POLY5) 

Function 

5.1.21 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

5.2.15 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

5.2.15 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

Fast-Fourier  T  ransform 
(FFT)  SU 

5.2.8 

Fast-Fourier  Transform  (FFT) 

SU 

5.2.8 

Discrete  Sine/Cosine 
Transform  (DRST)  SU 

5.2.5 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Interpolate  Profile 
(INTPROF)  SU 

5.1.18 

Interpolate  Profile  (INTPROF) 

SU 

5.1.18 

Linear  Interpolation 
(FN  PLINT)  Function 

5.2.14 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Profile  Reference 
(PROFREF)  SU 

5.1.22 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Remove  Duplicate 

Refractivity  Levels 
(REMDUP)  SU 

5.1.24 

Advance  Propagation  Model 

Step  (APMSTEP)  CSC 

5.2 

Ray  Optics  Loss  (ROLOSS) 
SU 

5.2.20 

Ray  Optics  Loss  (ROLOSS) 

SU 

5.2.20 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Antenna  Pattern  (ANTPAT) 
SU 

5.1.6 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design 
Description  Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Ray  Trace  (RAYTRACE)  SU 

5.2.17 

CSCI  Detailed  Design 

5 

Extended  Optics  Initialization 
(XOINIT)  CSC 

5.3 

Extended  Optics 

Initialization  (XOINIT)  CSC 

5.3 

APM  Clean  (APMCLEAN)  SU 

5.3.1 

APM  Clean  (APMCLEAN) 

SU 

5.3.1 

Discrete  Sine/Cosine  (DRST) 

SU 

5.2.5 

Extended  Optics 

Initialization  (XOINIT)  CSC 

5.3 

Clutter-to-Noise  (CLUTTER) 

SU 

5.3.2 

Clutter-to-Noise 
(CLUTTER)  SU 

5.3.2 

GIT  Initialization  (GITJNIT)  SU 

5.3.5 

GIT  Initialization  (GIT  IN  IT) 
SU 

5.3.5 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Clutter-to-Noise 
(CLUTTER)  SU 

5.3.2 

Standard  Propagation  Model 
Initialization  (SPMJNIT)  SU 

5.3.11 

Clutter-to-Noise 
(CLUTTER)  SU 

5.3.2 

Standard  Propagation  Model 
(SPM)  SU 

5.3.12 

Standard  Propagation 

Model  (SPM)  SU 

5.3.12 

Diffraction  Loss  (FN  DLOSS) 
Function 

5.3.3 

Standard  Propagation 

Model  (SPM)  SU 

5.3.12 

GofZ  (FN  GOFZ)  Function 

5.3.6 

Standard  Propagation 

Model  (SPM)  SU 

5.3.12 

Optical  Region  Limit  (OPLIMIT) 
SU 

5.3.8 

Optical  Region  Limit 
(OPLIMIT)  SU 

5.3.8 

Get  Theta  (GETTHETA)  SU 

5.3.4 

Get  Theta  (GETTHETA) 

SU 

5.3.4 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design 
Description  Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FNDIECON)  Function 

5.2.3 

Optical  Region  Limit 
(OPLIMIT)  SU 

5.3.8 

R1  Iteration  (RIITER)SU 

5.3.10 

R1  Iteration  (RIITER)SU 

5.3.10 

Get  Theta  (GETTHETA)  SU 

5.3.4 

Get  Theta  (GETTHETA) 

SU 

5.3.4 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Standard  Propagation 

Model  (SPM)  SU 

5.3.12 

Optical  Difference  (OPTICF) 

SU 

5.3.9 

Optical  Difference 
(OPTICF)  SU 

5.3.9 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN_DIECON)  Function 

5.2.3 

Extended  Optics 

Initialization  (XOINIT)  CSC 

5.3 

Mean  Filter  (MEANFILT)  SU 

5.3.7 

CSCI  Detailed  Design 

5 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

APM  Clean  (APMCLEAN)  SU 

5.3.1 

APM  Clean  (APMCLEAN) 

SU 

5.3.1 

Discrete  Sine/Cosine 

Transform  (DRST)  SU 

5.2.5 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

Extended  Optics  (EXTO)  SU 

5.4.1 

Extended  Optics  (EXTO) 

SU 

5.4.1 

Linear  Interpolation 
(FN_PLINT)  Function 

5.2.14 

Extended  Optics  (EXTO) 

SU 

5.4.1 

Troposcatter  (TROPOSCAT) 

SU 

5.2.24 

Troposcatter 
(TROPOSCAT)  SU 

5.2.24 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

5.2.13 
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Table  6.  APM  internal  interface  design,  (continued) 


Software  Design  Description 

Software  Design  Description 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

5.2.13 

Antenna  Pattern  (ANTPAT)  SU 

5.1.6 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Antenna  Pattern  (ANTPAT)  SU 

5.1.6 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN  DIECON)  Function 

5.2.3 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

Ray  Optics  Loss  (ROLOSS)  SU 

5.2.20 

Ray  Optics  Loss  (ROLOSS)  SU 

5.2.20 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Antenna  Pattern  (ANTPAT)  SU 

5.1.6 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Dielectric  Constant 
(FN_DIECON)  Function 

5.2.3 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Ray  Trace  (RAYTRACE)  SU 

5.2.17 

CSCI  Detailed  Design 

5 

Return  Grazing  Angle 
(RET_GRAZE)  CSC 

5.5 

4.3.4  Internal  Data 

The  APM  CSCI  takes  full  advantage  of  Fortran  95  features,  utilizing  allocatable 
arrays  for  all  internal  and  input  arrays.  The  external  CSCI  designer  must  correctly 
allocate  and  initialize  all  arrays  necessary  for  input  to  the  APM  CSCI. 
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Due  to  the  computational  intensity  of  the  APM  CSCI,  it  may  not  be  necessary  or 
desirable  to  use  the  extreme  capability  of  the  APM  CSCI  for  all  applications.  The 
variables  nmut  and  nzout  refer  to  the  desired  number  of  range  and  height  output  points  for 
any  one  particular  application,  and  will  be  specified  when  the  APMINIT  CSC  is  called. 

One  of  the  parameters  returned  to  the  external  application  from  the  APMINIT 
CSC  is  ierror,  which  allows  for  greater  flexibility  in  how  input  data  are  handled  in  the 
external  application.  Table  7  lists  all  possible  errors  that  can  be  returned. 

The  logical  variables  !err6  and  lerrl2,  when  set  to  ‘.false.’,  allow  the  external 
application  to  bypass  their  associated  errors,  as  these  are  not  critical  to  the  operation  of 
the  APM  CSCI. 


Table  7.  APMINIT  SU  returned  error  definitions. 


Definition 


-5 

-6 


Frequency  input  must  be  greater  than  or  equal  to  2  MHz. 

Last  range  in  terrain  profile  is  less  than  rmax.  Will  only  return  this  error  if  len-6  set  to 
‘.true.’. 


-7 

-8 

-9 

-10 

-11 

-12 

-13 

-14 

-17 

-18 

-21 

-22 

-23 

-24 

-25 

-26 

-41 

-42 


Specified  cut-back  angles  (for  user-defined  height  finder  antenna  pattern)  are  not 
increasing. 

hmax  is  less  than  maximum  height  of  terrain  profile. 

Antenna  height  with  respect  to  mean  sea  level  is  greater  than  maximum  height  hmax. 
Beamwidth  is  less  than  or  equal  to  zero  for  directional  antenna  pattern. 

Number  of  antenna  pattern  or  power  reduction  factors  and  angles  is  less  than  or  equal 
to  1.  For  ipat  =  6,  nfacs  must  be  at  least  1;  for  ipat  =  7,  rifacs  must  be  at  least  2. 

Range  of  last  environment  profile  given  (for  range-dependent  case)  is  less  than  rmax. 
Will  only  return  this  error  if  lerrl2  set  to  ‘.true.’. 

Height  of  first  level  in  any  user-specified  refractivity  profile  is  greater  than  0.  First 
height  must  be  at  mean  sea  level  (0.0)  or  <  0.0  if  below  mean  sea  level. 

Last  gradient  in  any  environment  profile  is  negative. 

Range  points  of  terrain  profile  are  not  increasing. 

First  range  value  in  terrain  profile  is  not  0. 

Clutter  calculations  are  specified  but  no  transmitter  power  has  been  provided. 

Clutter  calculations  are  specified  but  no  pulse  length  has  been  provided. 

Clutter  calculations  are  specified,  but  no  horizontal  beamwidth  has  been  provided. 

Clutter  calculations  are  desired  over  terrain  or  for  frequencies  less  than  1  GHz,  but  no 
yc  values  have  been  specified. 

Specified  only  the  PE  model  to  be  used  but  did  not  specify  maximum  propagation 
angle  thmax. 

Clutter  calculations  are  specified  with  the  propagation  path  partly  or  entirely,  over 
water  but  did  not  specify  a  wind  speed. 

Transmitter  height  is  less  than  1.5  meters. 

Minimum  height  input  by  user,  hmin,  is  greater  than  maximum  height,  hmax. 
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Table  7.  APMINIT  SU  returned  error  definitions  (continued). 

terror 

Definition 

-43 

Transform  size  is  greater  than  230. 

-44 

Combination  of  frequency  and  antenna  beamwidth  results  in  antenna  physically  below  the 
surface.  Increase  frequency  or  beamwidth  for  valid  combination. 

-45 

-100 

115 

Wind  speed  specified  is  greater  than  the  maximum  allowed  for  the  specified  frequency. 

Error  in  terrain  ray  trace  (contact  the  APM  CSCI  developers  if  this  occurs ) 

*  WARNING*:  Antenna  height  with  respect  to  mean  sea  level  is  greater  than  the  last 
height  in  the  refractivity  profile  at  the  source. 

The  APM  CSCI  provides  propagation  loss  and  factor  for  all  heights  and  ranges 
when  running  in  a  full  hybrid  mode.  When  running  in  a  partial  hybrid  mode,  it  provides 
propagation  loss  and  factor  for  limited  heights  and  angles.  Finally,  it  will  also  be  limited 
in  both  height  and  angle  coverage  when  running  in  a  PE-only  mode.  Refer  to  Section  7.1 
for  environmental  conditions  under  which  each  execution  mode  is  automatically  selected. 

Absorption  by  atmospheric  gases  (oxygen  and  water  vapor)  may  be  important  to 
some  applications  of  the  APM  CSCI  and  is  controlled  by  specifying  a  non-zero  value  for 
the  absolute  humidity,  absimm,  and  the  surface  air  temperature,  tair;  or  likewise,  specifying 
a  non-zero  value  for  the  gaseous  absorption  attenuation  rate,  ya. 

A  particular  application  of  the  APM  CSCI  may  or  may  not  require  the 
consideration  of  troposcatter  effects  within  the  propagation  loss  calculations.  For 
example,  a  radar  evaluation  most  likely  would  not  be  influenced  by  troposcatter;  while  an 
ESM  evaluation  would.  APM  has  the  feature  of  including  or  not  including  the 
troposcatter  calculation  by  setting  a  logical  flag  called  Tropo.  Setting  this  flag  to  ‘.false.’ 
would  omit  the  calculation.  Setting  this  flag  to  ‘.true.’  would  include  the  calculation.  For 
the  APM  CSCI  implementation  in  external  coverage  and  loss  diagram  applications,  Tropo 
must  be  set  equal  to  ‘.true.’  so  as  to  include  the  calculation. 

APM,  by  default,  will  run  in  an  “automatic”  mode  in  which,  depending  upon  user- 
specified  inputs,  will  choose  the  appropriate  sub-models  to  use  for  a  particular 
application.  However,  by  setting  the  logical  flag  PEfjag  to  ‘.true.’,  APM  will  be  forced  to 
use  only  the  PE  sub-model  for  a  particular  external  application.  By  default,  this  flag  is  set 
to  ‘.false.’.  If  this  flag  is  ‘.true.’,  then  the  visible  portion  of  the  maximum  PE  propagation 
angle,  thmax  (he.,  the  maximum  propagation  angle  the  PE  algorithm  will  accommodate  in 
the  field  calculations),  and  the  parameter,  rmu!t,  must  be  specified.  By  default,  rmut1  is  equal 
to  1;  however,  thmax  does  not  have  a  default  value  and  must  be  explicitly  defined.  The 
parameter  rmujt  is  a  range  step  multiplier  that  allows  the  user  to  vary  the  PE  range  step 
from  the  default  calculated. 
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Use  this  option  with  caution,  as  you  must  have  some  basic  knowledge  of  PE 
algorithms  and  how  they  work  to  input  proper  combinations  of  maximum  calculation 
angles  and  range  steps  for  a  given  frequency.  When  using  this  option,  most  error 
checking  is  bypassed  and  parameter  limits  can  be  over-ridden.  Erroneous  field  values 
may  result  if  a  poorly  chosen  combination  of  thmax  and  rmuit  are  used. 

APM  Ver.  2.1.04  has  the  capability  of  detennining  and  providing  to  the  main 
calling  program  direct  and  reflected  propagation  angles,  as  well  as  the  propagation  factor 
from  both  direct  and  reflected  rays.  Note  that  these  quantities  are  obtained  only  from  the 
FE  and  RO  sub-models  within  APM.  It  does  not  compute  the  angles  and  propagation 
factors  for  the  separate  rays  within  the  split-step  PE  and  XO  sub-models,  but  does 
provide  the  resultant  propagation  angle  and  factor  within  these  regions.  This  information 
is  returned  if  the  logical  flag  lang  is  set  to  ‘.true.’;  however,  do  not  enable  this  feature  if 
any  portion  of  the  propagation  path  is  over  land.  The  computation  is  valid  only  when  the 
propagation  path  is  entirely  over  water. 


5.  CSCI  DETAILED  DESIGN 

A  description  of  each  component  of  the  APM  CSCI  is  provided  in  the  following 
subsections. 

5.1  ADVANCE  PROPAGATION  MODEL  INITIALIZATION  (APMINIT)  CSC 

The  APMINIT  CSC  interfaces  with  various  SUs  for  the  complete  initialization  of 
the  APM  CSCI. 

Upon  entering  the  APMINIT  CSC,  several  variables  are  initialized.  All  internal 
logical  flags  controlling  certain  environmental  calculations  and  errors  are  initialized. 

The  wind  speeds  and  ranges  are  checked  to  see  if  they  fall  within  the  specified 
bounds.  If  not,  then  an  error  is  returned. 

The  variables  and  arrays  necessary  for  rough  surface  and  clutter  calculations  are 
initialized  and  checked  for  valid  values. 

Next,  the  absorption  calculation  flag,  kabs,  is  set  to  1  if  the  air  temperature,  tair,  or 
the  absolute  humidity,  abs/mm,  are  non-zero.  If  an  attenuation  rate  is  specified  (ya  *  0), 
then  kabs  is  set  to  2.  If  the  user  specifies  tair  and  absimm  to  be  0,  then  kabs  is  set  equal  to  0, 
in  which  case,  no  absorption  losses  are  computed. 
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Next,  if  running  the  APM  CSCI  under  the  hybrid  mode  ( PEflag  =  ‘.false.’),  then 
the  antenna  height,  the  maximum  output  range,  rmax,  the  maximum  output  height,  hmax; 
and  the  minimum  output  height,  hmin,  are  checked  for  valid  numerical  values.  If  the 
antenna  height  is  below  1.5  m  then  ierror  is  set  to  -41  and  the  APMINIT  CSC  is  exited. 
rmax  is  set  to  the  value  specified  from  the  calling  CSCI  or  5000  m,  whichever  is  greater; 
and  hmax,  is  set  to  the  value  specified  from  the  calling  CSCI  or  100  m,  whichever  is 
greater.  If  hmin  is  greater  than  hmax,  then  ierror  is  set  to  -42  and  the  APMINIT  CSC  is 
exited.  If  the  maximum  output  range  and  minimum  and  maximum  output  height  values 
are  valid,  then  the  APMINIT  CSC  proceeds  to  the  next  step. 

The  atmospheric  volume  must  be  “covered”  or  resolved  with  a  mesh  of 
calculation  points  that  will,  as  a  matter  of  routine,  exceed  the  height/range  resolution 
requirements  of  the  particular  application  of  the  APM  CSCI.  The  height  and  range  mesh 
size  per  APM  CSCI  output  point,  A zout  and  A rout,  respectively,  are  calculated  from  the 
number  of  APM  output  points  and  the  maximum  range  and  height  as  follows: 


A,,  —  max 

r out 


U  /  L 

a  _  _  max _ min 

out 

Yl 

n'zout 

The  number  of  terrain  range/height  pairs,  itpa,  used  for  internal  calculations  is 
initialized  to  1  plus  the  user-specified  number  of  range/height  pairs,  itp.  The 
ALLARRAY  APM  SU  is  then  referenced  to  dynamically  allocate  and  initialize  all  arrays 
associated  with  terrain,  refractivity,  troposcatter,  and  general  variable  arrays.  If  an  error 
has  occurred  while  allocating  memory,  ierror  is  returned  with  a  non-zero  value  and  the 
CSC  is  exited;  otherwise,  the  CSC  proceeds  to  the  next  step. 

Next,  the  constants  used  to  detennine  the  antenna  pattern  factor  are  computed. 
First,  if  a  user-defined  height-finder  antenna  pattern  has  been  specified  (ipat  =  6),  along 
with  power  cut-back  angles  and  factors,  then  the  angles  are  converted  to  radians  and 
stored  in  array  hfangr.  If  the  cut-back  angles  are  not  steadily  increasing,  ierror  is  set  to 
-7  and  the  CSC  is  exited;  otherwise,  the  CSC  proceeds  with  the  next  step. 

If  a  directional  antenna  pattern  has  been  specified,  the  antenna  vertical  beamwidth 
in  degrees,  /U}nv,  is  checked  for  extremely  small  beamwidth  values.  If  the  value  is  less  than 
or  equal  to  10"4,  ierror  is  set  to  -10  and  the  CSC  is  exited;  otherwise,  the  CSC  proceeds 
with  the  next  step. 

The  antenna  beamwidth  and  elevation  angles  are  converted  to  radians  (/4MT  and 
juor,  respectively)  and  the  variables,  antfac  and  /w,  for  use  in  the  ANTPAT  SU  are 
determined  as  follows. 
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If  the  antenna  pattern  is  Gaussian  (ipat=2),  then  antfac  is  given  by 


antfac  = 


.34657359 


SIN 


f  u  7 

rbwr 


“|2 


If  the  antenna  pattern  is  Sin(X)/X  (i/m  =  3),  or  a  generic  height  finder  (ipat  =  5), 
then  antfac  is  given  by 


and  Mmax  is  given  by 


,  1.39157 

ant  fac= - 7 - 


SIN 


Mb 


( 


n 


max 


=  TAN 


(  A 

2 

antfac-j 

1- 

n 
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/ 

If  running  the  APM  CSCI  in  hybrid  mode,  the  antenna  height  is  next  checked  for 
a  valid  height  based  on  the  combination  of  frequency  and  beamwidth  specified.  The 
antenna  height  must  not  be  less  than  the  radius  of  the  antenna  and  is  bounded  by 


f 


antht  >  maximum  of 


1.5, .6 - 

V  f  mhz  f^bw  J 


where  ca  is  the  speed  of  light  (299.79  x  106m/s  ). 

Next,  the  TERINIT  SU  is  referenced  to  initialize  all  terrain  profile  and  associated 
arrays.  If  an  error  has  occurred  while  in  the  TERINIT  SU,  ierror  is  returned  with  a  non¬ 
zero  value  and  the  CSC  is  exited;  otherwise,  the  CSC  proceeds  with  the  next  step. 

If  vertical  polarization  and/or  rough  surface  calculations  are  required  (i.e.,  a  non¬ 
zero  wind  speed  is  specified)  then  the  flag,  iaig,  indicating  which  DMFT  algorithm  to  use, 
is  set  to  1  (central  difference)  for  frequencies  less  than  400  MHz,  and  is  set  to  2 
(backward  difference)  for  frequencies  greater  than  400  MHz.  The  default  value  for  iaig  is 
0,  in  which  case,  no  DMFT  algorithm  is  used  for  the  particular  APM  application. 
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Arrays  containing  all  output  ranges,  rngout,  20  times  the  logarithm  of  all  output 
ranges,  rlogo,  and  the  square  of  the  output  ranges,  rsqrd,  are  initialized  according  to 


rngout  j  =i  Arout , 

rlogo =20  LOG10  (i  Arout  \  *  =  1, 2, .... n rout 

rsqrd ,  =  {iAr()utf. 

The  minimum  power  of  2  transform,  lnmin,  is  next  initialized  to  10.  If  the  PE-only 
option  is  not  activated  ( PEjjag  =  ‘.false.’),  then  the  execution  mode  in  which  the  APM 
CSCI  will  operate  is  determined.  Based  on  inputs,  it  determines  whether  to  use  the 
airborne  hybrid  mode  (hybrid 0),  full  hybrid  mode  (hybrid),  or  partial  hybrid  mode 
(hybrid 2).  For  antenna  heights  greater  than  100  m  above  the  local  ground  height,  hybrid  is 
set  equal  to  0.  For  antenna  heights  less  than  100  m,  hybrid  is  initialized  to  1.  If  performing 
a  terrain  case  (/,),= ’.true.’)  and  the  first  2500  m  of  the  terrain  profile  is  not  flat,  then  hybrid 
is  set  equal  to  2.  If  running  in  full  hybrid  mode  {i hybrid- 1)  then  the  ALLARRAYRO  SU 
is  referenced  to  allocate  and  initialize  all  arrays  associated  with  RO  calculations. 

The  variable  yfref  is  initialized  to  0.  If  a  terrain  profile  has  been  specified 
(/?«•=’. true.’)  then  v/,e/is  set  equal  to  ty\.  Next,  the  output  height  arrays  zout  and  zro  are 
initialized  as  follows: 


zoutj  =  hmref  +  i  Azout . 

,  i  —  . nzout , 

zro/  =  zoutj  —yfref 


where  the  variables  ty\  and  hmref  are  obtained  from  the  TERINIT  SU. 

Next,  the  REFINIT  SU  is  referenced  to  initialize  all  refractivity  associated  arrays. 
If  an  error  has  occurred  while  in  the  REFINIT  SU,  ierr0r  is  returned  with  a  non-zero  value 
and  the  CSC  is  exited;  otherwise,  the  CSC  proceeds  to  the  next  step. 

If  the  PE-only  option  is  activated  (PEjjag  =  ‘.true.’),  then  the  minimum  height  for 
the  PE  calculation  region  ztest  is  set  equal  to  htnm.  If  the  PE-only  option  is  not  activated 
( PE fiag  =  ‘.false.’),  then  output  height  arrays  used  in  FE  calculations  are  computed: 


zoutmai  =  zout i  -antrej 

,  /  —  1, 2,  ....n=out . 

zoutpai  =  zout i  -  y jr<y  +  antrej 


The  limiting  grazing  angle,  y/nm,  is  computed  as 


Vlim 


MAX 


.04443" 

/-.3333 

V  J  MHz 


.002, 
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If  more  than  one  refractivity  profile  has  been  specified  ( nprof>  1),  then  y/um  is  multiplied 
by  2.  It  is  then  adjusted  for  trapping  effects  by 


Vlim  =  ¥lim  +VI  2(rmmax-rmrnin}, 

where  rmmax  and  rmmin  are  determined  in  the  REFINIT  SU.  The  RO  elevation  angle  limit, 
aim,  is  given  by 


alim  ~ 


where  the  variable  rmtx  and  array  refdum  are  determined  in  the  REFINIT  SU.  Next,  the 
height  tolerance,  ztoi  is  initialized  to  0.05  and  the  range  and  index  variables  for  the  RO 
region,  iRop  and  xrcm,  are  initialized  to  -1  and  0,  respectively.  The  minimum  height  for  the 
PE  calculation  region  is  determined  next.  The  minimum  height  encompassing  all  trapping 
refractive  layers  is  given  by 


h  —  h  -4-/7 

"test  '‘'trap  , thick  ’ 

where  htrap  and  /?,/„,./<  are  determined  in  the  REFINIT  SU.  If  running  in  full  hybrid  mode 
(Jhvhrur  1 ),  the  minimum  height  for  the  PE  calculation  region  is  given  by 

2  test  —  MAX(/ztes? ,  1 .2  htermax  ) , 


where  htermax  is  determined  in  the  TERINIT  SU.  If  running  in  either  the  partial  hybrid 
mode  or  PE-only  mode,  ztest  is  then  given  by 

ztest=AMAX(htlim,antnf). 

The  tangent  angle,  atest,  used  for  automatic  calculation  of  the  maximum  propagation 
angle,  is  given  by 


a  test  =TAN_1 


Ztes,  +antref  + 


2  a 


ekst 


v 


J 
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with  aum  is  now  set  equal  to  the  greater  of  atest  or  the  previously  determined  and  aekst 
is  %  times  the  mean  earth’s  radius.  The  GET_K  SU  is  then  referenced  to  detennine  the 
effective  earth’s  radius  factor. 

If  the  grazing  angles  need  to  be  computed  for  rough  surface  and  clutter 
calculations  then  the  wavelength,  A  ,  and  the  free-space  wavenumber,  ko ,  are  initialized 
using  a  fixed  frequency  of  10  GHz  (frqg): 


A= 


The  maximum  PE  calculation  angle  is  set  equal  to  the  greater  of  4°  ( thmxg )  or  the 
maximum  terrain  tangent  angle,  au ,  detennined  in  TERINIT  SU.  The  FFTPAR  SU  is 

then  referenced  to  detennine  PE  grid  variables  and  the  transform  size  required.  Next,  the 
PEINIT  SU  is  referenced  to  initialize  all  arrays  and  variables  associated  with  the  PE 
calculation  algorithm.  Variables  needed  for  spectral  estimation  of  the  grazing  angles  are 
then  initialized.  The  number  of  bins,  np,  considered  in  the  near-surface  PE  region,  is  set 
equal  to  16.  The  power  of  2  transform,  lnp,  is  set  equal  to  9.  The  following  variables  used 
in  the  spectral  estimation  calculations  are  given  by 


ns  =  2"\ 


V  =- 


^p34 


n 


Cn„15  =- 


lp4 


The  ALLARRAY  XORUF  SU  is  then  referenced  to  allocate  and  initialize  all  arrays 
associated  with  rough  surface  calculations.  The  filter  array  filtp  is  now  detennined  by 

=  X  +  Vi  COS(/  cnpl5 )  /  =  0, 1, 2 ,...np4 , 


and  the  variable  xocon  is  given  by 


xo 


con 


A 

2nsAzPE 


The  GETANGLES  SU  is  next  referenced  to  determine  all  grazing  angles  and/or 
propagation  angles,  if  desired,  for  subsequent  rough  surface  calculations.  This  involves 
computing  a  complete  PE  run  out  to  the  maximum  range,  rmax.  In  doing  this,  the 
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refractivity  arrays  initially  set  in  the  REFINIT  SU  must  be  re-initialized  for  the  second,  or 
“real”,  PE  run  that  includes  rough  surface  effects. 

If  rough  surface  calculations  are  not  required  (ruf  =  ‘.false.’)  then  the  grazing 
angle  array  iPis  initialized  to  0,  with  the  number  of  grazing  angles,  igrz,  set  to  1. 

Next,  the  wavelength  and  free-space  wavenumber  are  recomputed  for  the 
specified  frequency  J "mh z- 


X= 


The  DIEINIT  SU  is  then  referenced  to  initialize  all  dielectric  ground  constants.  If  rough 
surface  calculations  are  required,  two  terms  used  in  the  computation  of  the  rough  surface 
reflection  coefficient  are  determined  as  follows: 


fac  = 


47t(.0051) 

X 


VUf  hi  =rUffac  Windl 


where  wind]  is  the  first  wind  speed  in  m/s  provided  by  the  calling  CSCI. 

If  the  PE-only  option  is  activated  ( PEflag  =  ‘.true.’)  and  the  frequency  specified  is 
greater  or  equal  to  50  MHz,  then  the  maximum  propagation  calculation  angle  used  in  the 
PE  region,  0max,  is  determined  according  to 


0 


max 


=  %th , 


The  minimum  transform  size  is  then  set  to  plus  1  for  every  5°  in  0max.  For 
frequencies  less  than  50  MHz  {HFfjag  =  ‘.true.’),  0 75  and  0max  are  defined  as 


e7J=MAX(2s/p„,40“) 

e„=MiN(Ke„,80»)  ’ 


where  slpmax  is  the  maximum  of  the  terrain  slope  along  the  path.  If  no  terrain  is  specified, 
then  @75  is  set  equal  to  20°.  The  FFTPAR  SU  is  then  referenced  to  detennine  the  PE  grid 
variables  and  the  maximum  valid  height  within  the  PE  calculation  region,  z//m,  is  set  equal 
to  the  smaller  of  ztest  and  htn,n.  The  PEINIT  SU  is  then  referenced  to  initialize  all  PE 
variables  and  arrays  and,  if  required  (i.e.,  iaig  >  0),  the  ALN_INIT  SU  is  referenced  to 
initialize  all  arrays  and  variables  used  in  the  surface  impedance  calculations. 
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If  the  PE-only  option  is  not  activated  ( PEyag  =  ‘.false.’)  and  if  using  the  airborne 
hybrid  mode  (hybrid),  then  the  maximum  PE  calculation  angle  is  detennined  from  60, 
obtained  from  the  GET  K  SU,  according  to 

f)  —Vfi) 

and  the  minimum  transform  size  is  set  to  lnmin  plus  1  for  every  5°  in  0max-  The  FFTPAR 
SU  is  then  referenced  to  detennine  the  PE  grid  variables  and  the  maximum  valid  height 
within  the  PE  calculation  region,  zum,  is  set  equal  to  ztest.  If  the  airborne  mode  is  not  the 
mode  of  execution  {ihybrud1 0),  then  the  GETTHMAX  SU  is  referenced  to  determine  the 
minimum  angle  075  to  use  within  the  PE  calculation  region.  zu„  is  then  set  equal  to  the 
smaller  of  z/im  and  htum. 


To  determine  if  XO  calculations  are  required,  the  following  steps  1  through  6  are 
performed  for  i hybrid  not  equal  to  0. 

1.  If  zum  is  less  than  htum- 10'5,  then  the  SU  proceeds  with  steps  2  through  6.  Otherwise, 
these  steps  are  skipped  and  the  output  range  and  index,  ratz  and  iratz,  respectively,  are 
calculated  as 


y  =2r 

atz  max 5 

^ratz  ^  rout  ^ 


2.  The  bin  number  jzum,  corresponding  to  zum,  is  given  by 


jzum=  INT 


V  A ZPE  J 


and  zum  is  recomputed  such  that  it  corresponds  to  an  integer  multiple  of  bins  or  mesh 
heights:  zUm=jzUm  A zPE. 


3.  Next,  ratz  and  iratz  are  determined  based  on  the  height,  angle,  and  range  arrays  htemp, 
raya,  and  rtemp,  previously  determined  in  the  GETTHMAX  SU.  First,  the  index  j  is 
initialized  to  iap  (previously  determined  in  the  GETTMAX  SU)  and  the  index  id  is 
initialized  to  1.  Steps  3. a  through  3.b  are  repeated  until  j  is  greater  than  irU.m/>- 

a.  If  htempj  is  greater  than  z/„„,  then  the  iteration  is  ended  and  the  SU  proceeds  with 
step  4. 
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b.  If  htempj  is  greater  than  zrtid,  then  id  is  incremented  by  1.  The  index  j  is  now 
incremented  by  1.  Steps  3a  through  3b  are  then  repeated. 

4.  The  index  ira  is  set  equal  to  the  greater  of  1  or  j- 1 ;  the  index  idg  is  set  equal  to  id- 1; 
and  the  gradient  g,-d  is  set  equal  to  grui„. 

5.  Next,  the  ray  with  initial  launch  angle  aiaunc/,  is  traced  from  height  htempira  to  z/„„.  The 
square  of  the  local  ray  angle,  rad,  at  the  end  of  the  ray  trace  step  is  given  by 

rad  =  rayafm  +  2  grd  (zUm  -  htempira  ) . 


The  local  ray  angle,  aatz,  at  height  zum  is  initialized  to  0.  If  rad  is  greater  than  0,  then 
aat:  is  given  by 


aatz  =SIGN(l,  ray  a  )  V rad  , 


and  the  range  ratz  is  now  given  by 


=  rtempim  + 


<*atz-r<tya« 

grd 


6.  If  ratz  is  less  than  rmax  and  z/„„  is  less  than  htum,  then  the  index  k  is  determined  such 
that  rngoutk- 1  <  ratz  <  rngoutk .  Then  imtz  is  set  equal  to  the  smaller  of  nrout  and  k,  and 
ixostp  is  set  equal  to  iratz-  The  number  of  XO  calculations  needed,  ixo,  is  then  set  equal 

to  Ixostp • 


The  PEINIT  SU  is  next  referenced  to  initialize  all  variables  and  arrays  necessary 
for  PE  calculations.  All  variables  and  arrays  associated  with  XO  calculations  are  now 
initialized,  provided  ixo  is  greater  than  0.  The  maximum  number  of  points,  izmax,  allocated 
for  arrays  used  in  XO  calculations,  is  determined  by 


f  \ 

r  —  v 

NINT  max  atz 

V  ^ rPE  J 


IZ- 

me 


+  4. 


Next,  variables  needed  for  spectral  estimation  calculations  are  initialized.  The  number  of 
bins,  nP,  considered  in  the  upper  PE  region,  is  set  equal  to  8  if  no  terrain  profde  or  wind 
speeds  are  specified,  and  16,  otherwise.  The  power  of  2  transform,  lnp,  is  set  equal  to  8. 
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The  ALN  INIT  SU  is  next  referenced  to  initialize  all  arrays  and  variables  used  in  the 
surface  impedance  calculations  and  the  FILLHT  SU  is  referenced  to  obtain  the  htfe  array 
separating  the  FE  from  the  RO  region. 

Several  variables  associated  with  the  beginning,  middle,  and  end  of  a  PE  range 
step,  are  initialized.  If  grazing  angles  were  computed,  the  GRAZEINT  SU  is  referenced 
to  interpolate  the  angles  (as  detennined  in  the  GETANGLES  SU)  at  every  output  range 
step.  If  troposcatter  calculations  are  required  ( Tropo  =  1),  then  the  TROPOINIT  SU  is 
referenced  to  initialize  all  variables  and  arrays.  An  additive  loss  tenn  plcnst  and  the  free 
space  loss  fsl  are  determined  at  each  output  range  step  by 

/>/„,,=  20  LOG,,  (2  i„), 

Mi  =  rl°g°i  +  Pl cnst  ;  i  =  U  2, . nrout  ■ 


Finally,  if  the  absorption  flag  kabs  is  equal  to  1,  then  the  GASABS  SU  is 
referenced  to  determine  the  absorption  attenuation  rate,  gasatt.  If  kai,s  is  equal  to  2,  then 

■7 

gasatt  is  determined  by  the  calling  CSCI-specified  attenuation  rate,  ya,  multiplied  by  10' 
to  convert  ya  from  dB/km  to  dB/m.  Several  dynamically  allocated  terrain  arrays  used  in 
the  TERINIT  SU  are  deallocated  and  the  CSC  is  exited.  Table  8  and  Table  9  provide 
identification,  description,  unit  of  measure,  and  the  computational  source  for  each 
APMINIT  CSC  input  and  output  data  element. 
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Table  8.  APMINIT  CSC  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ClbShum 

Absolute  humidity  near  the  surface 

g/meters3 

Calling  CSCI 

&ekst 

%  times  mean  earth  radius 

meters 

APMMOD 

G 

Gain  of  transmit/receive  antennas 

dBi 

Calling  CSCI 

ClYltht 

Transmitting  antenna  height  above  local  ground 

meters 

Calling  CSCI 

Co 

Speed  of  light  multiplied  by  10'6 

meters/sec 

APMMOD 

chlt 

Clutter  calculation  flag: 

‘.false.’  =  do  not  compute  surface  clutter 
‘.true.’  =  compute  surface  clutter 

N/A 

Calling  CSCI 

dielec 

Two-dimensional  array  containing  the  relative  permittivity 
and  conductivity;  dielec\j  and  dielec2,i,  respectively. 

N/A, 

S/m 

Calling  CSCI 

J MHz 

Frequency 

MHz 

Calling  CSCI 

Ya 

Gaseous  absorption  attenuation  rate 

dB/km 

Calling  CSCI 

yc 

Array  of  “backscattering  effectiveness”  values  used  in 
computing  the  reflectivity  over  land 

dB 

Calling  CSCI 

yrng 

Array  of  corresponding  ranges  for  each  yc  value 

meters 

Calling  CSCI 

hfang 

Cut-back  angles 

degrees 

Calling  CSCI 

hffcic 

Cut-back  antenna  pattern  factors 

N/A 

Calling  CSCI 

ll  max 

Maximum  output  height  with  respect  to  mean  sea  level 

meters 

Calling  CSCI 

min 

Minimum  output  height  with  respect  to  mean  sea  level 

meters 

Calling  CSCI 

hmsl 

Two-dimensional  array  containing  heights  with  respect  to 
mean  sea  level  of  each  profile.  Array  format  must  be  hmsl,j 
=  height  of  fl  level  of f'  profile;  j=\  for  range-independent 
cases 

meters 

Calling  CSCI 

l  extra 

Extrapolation  flag  for  refractivity  profiles  entered  in 
combination  with  terrain  below  below  mean  sea  level 

0  =  extrapolate  to  minimum  terrain  height  standard 
atmosphere  gradient 

1=  extrapolate  to  minimum  terrain  height  using  first 
gradient  in  profile 

N/A 

Calling  CSCI 

lgc 

Number  of  yc  values  specified 

N/A 

Calling  CSCI 

lgr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

igmd 

Integer  array  containing  ground  type  composition  for  given 
terrain  profile  -  can  vary  with  range.  Different  ground  types 
are: 

0  =  seawater 

1  =  freshwater 

2  =  wet  ground 

3  =  medium  dry  ground 

4  =  very  dry  ground 

5  =  ice  at  -1  degree  C 

6  =  ice  at  -10  degree  C 

7  =  user-defined  (in  which  case,  values  of  relative 
permittivity  and  conductivity  must  be  given) 

N/A 

Calling  CSCI 

39 


Table  8.  APMINIT  CSC  input  data  element  requirements  (continued). 


Name 

Description 

Units 

Source 

Ipat 

Antenna  pattern  type 

1  =  Omnidirectional 

2  =  Gaussian 

3  =  Sine(x)/x 

4  =  Cosecant-squared 

5  =  Generic  height-finder 

6  =  User-defined  height-finder 

7  =  User-defined  antenna  patter 

N/A 

Calling  CSCI 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

Irtemp 

Temporary  number  of  range  steps  (used  for  ray  tracing) 

N/A 

APMMOD 

hp 

Number  of  height/range  points  in  profile 

N/A 

Calling  CSCI 

lang 

Propagation  angle  and  factor  output  flag 

‘.true.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and 
factors 

N/A 

Calling  CSCI 

lerr6 

Logical  flag  to  allow  for  error  -6  to  be  bypassed 

N/A 

Calling  CSCI 

lerrl2 

Logical  flag  to  allow  for  error  -12  to  be  bypassed 

N/A 

Calling  CSCI 

P sys 

Miscellaneous  system  losses 

dB 

Calling  CSCI 

Ivlp 

Number  of  levels  in  refractivity  profile 

N/A 

Calling  CSCI 

Nf 

Noise  figure 

dB 

Calling  CSCI 

ftfacs 

Number  of  user-defined  cut-back  angles  and  cut-back 
antenna  factors  for  user  specified  height-finder  antenna  type 

N/A 

Calling  CSCI 

ft  prof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 

ftrout 

Number  of  output  range  points  desired 

N/A 

Calling  CSCI 

ftw 

Number  of  wind  speeds 

N/A 

Calling  CSCI 

ftzout 

Number  of  output  height  points  desired 

N/A 

Calling  CSCI 

ftzout_rtg 

Number  of  output  receiver  heights  specified  relative  to  the 
local  surface  elevation. 

N/A 

Calling  CSCI 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

N/A 

Calling  CSCI 

Pi 

Constant  equal  to  the  value  of  n 

N/A 

APMMOD 

P, 

Transmitter  peak  power 

kW 

Calling  CSCI 

refrnsl 

Two-dimensional  array  containing  refractivity  with  respect 
to  mean  sea  level  of  each  profile.  Array  format  must  be 
refrnsl ij  =  M-unit  at  i,h  level  of  j,h  profile;y=l  for  range- 
independent  cases 

M-units 

Calling  CSCI 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types 
apply 

meters 

Calling  CSCI 
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Table  8.  APMINIT  CSC  input  data  element  requirements  (continued). 


Name 

Description 

Units 

Source 

V* max 

Maximum  specified  range 

meters 

Calling  CSCI 

f mult 

PE  range  step  multiplication  factor 

N/A 

Calling  CSCI 

rngprof 

Ranges  of  each  profile:  rngprof  =  range  of  ?h  profile 

meters 

Calling  CSCI 

mgwind 

Ranges  of  wind  speeds  entered:  mgwind  j  =  range  of  i'h 
wind  speed 

meters 

Calling  CSCI 

t air 

Air  temperature  near  the  surface 

°C 

Calling  CSCI 

terx 

Range  points  of  terrain  profile 

meters 

Calling  CSCI 

ten > 

Height  points  of  terrain  profile 

meters 

Calling  CSCI 

zoutrtg 

Array  of  output  receiver  heights  specified  relative  to  the 
local  surface  elevation. 

meters 

Calling  CSCI 

th 

1,1  max 

Visible  portion  of  maximum  PE  calculation  angle 

degrees 

Calling  CSCI 

@hbw 

Horizontal  beamwidth 

degrees 

Calling  CSCI 

T 

Pulse  length/width 

psec 

Calling  CSCI 

T 

J  ropo 

Troposcatter  calculation  flag: 

‘. false. ’=  no  troposcatter  calcs 
‘.true.’  =  troposcatter  calcs 

N/A 

Calling  CSCI 

Mbw 

Antenna  vertical  beamwidth 

degrees 

Calling  CSCI 

Mo 

Antenna  elevation  angle 

degrees 

Calling  CSCI 

wind 

Array  of  wind  speeds 

meters/ 

sec 

degrees 

Calling  CSCI 

winddir 

Angle  between  antenna  boresight  and  upwind  direction 

Calling  CSCI 

Table  9.  APMINIT  CSC  output  data  element  requirements. 


Name 

Description 

Units 

&atz 

Local  ray  or  propagation  angle  at  height  Z/,-m  and  range  rat- 

radians 

&  launch 

Launch  angle  used  which,  when  traced,  separates  PE  and  XO  regions  from  the 

RO  region 

N/A 

(%lim 

Elevation  angle  of  the  RO  limiting  ray 

radians 

antfac 

Antenna  pattern  parameter  (depends  on  ipat  and  ///,„.) 

N/A 

Av out 

Output  range  step 

meters 

AZout 

Output  height  increment 

meters 

flltp 

Array  filter  for  spectral  estimation  calculations 

N/A 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

gasatt 

Gaseous  absorption  attenuation  rate 

dB/m 
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Table  9.  APMINIT  CSC  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

hfangr 

Antenna  pattern  cut-back  angles  (for  specific  height  finder,  or  user-defined 
antenna  patterns) 

radians 

HFflag 

HF  computation  flag  indicating  the  frequency  specified  is  less  than  50  MHz 

N/A 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being  used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

terror 

Error  flag 

N/A 

t  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  airborne  hybrid  model  (FEDR  +  PE) 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

t-ratz 

Index  of  output  range  step  in  which  to  begin  storing  propagation  factor  and 
outgoing  angle  for  XO  region 

N/A 

tROp 

Array  index  for  previous  range  in  RO  region 

N/A 

t-tpa 

Number  of  height/range  points  pairs  in  terrain  profile  arrays  tx,  ty 

N/A 

t-xo 

Number  of  range  steps  in  XO  calculation  region 

N/A 

t-xostp 

Current  output  range  step  index  for  XO  calculations 

N/A 

IZmax 

Maximum  number  of  points  allocated  for  arrays  associated  with  XO 
calculations 

N/A 

jzlim 

PE  bin  #  corresponding  to  Z/im,  i.e.,  ziim  =jzum  Azpe 

N/A 

kabs 

Gaseous  absoiption  calculation  flag: 

0  =  no  absorption  loss 

1  =  compute  absorption  loss  based  on  air  temperature  tair  and  absolute 
humidity  abs]mm 

2  =  compute  absorption  loss  based  on  specified  absorption  attenuation  rate 

Ya 

Free-space  wavenumber 

N/A 

kQ 

meters"1 

A 

Wavelength 

meters 

ln  . 

Minimum  power  of  2  transform  size 

N/A 

lnp 

Power  of  2  transform  size  used  in  spectral  estimation  calculations;  i.e.,  np  =  2 ,np 

N/A 

Irtg 

Logical  flag  indicating  if  loss  relative  to  the  local  ground  height  needs  to  be 
computed 

‘.true.’  =  Compute  loss  relative  to  ground  at  heights  specified  by  array 
zoutrtg 

‘.false.’  =  Do  not  compute  loss 

N/A 

t^or 

Antenna  pattern  elevation  angle 

radians 

{J'bwr 

Antenna  vertical  beamwidth  in  radians 

radians 

f^max 

Limiting  angle  for  SIN(X)/X  and  generic  height  finder  antenna  pattern  factors 

N/A 

np 

Number  of  bins  in  upper  and  near-surface  PE  region  to  consider  for  spectral 
estimation 

N/A 

Wp34 

N/A 
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Table  9.  APMINIT  CSC  output  data  element  requirements,  (continued) 


Name 


Wp4 

ns 

pietist 

y^lim 


Description 

V*  np 

Transfonn  size  for  spectral  estimation  calculations 
Constant  used  in  determining  propagation  loss  (plcnst 
Grazing  angle  of  limiting  ray 


20  logi0(2  ka)) 


V atz 

rlogo 

rngout 

rsqrd 

ruf 


ruffac 

rufh, 

0max 
&75 
XO 'con 

y/ref 

xROn 

Z lim 

ZOUt 

zoutma 

zoutpa 

zro 

Zfest 

Zfol 


Range  at  which  Z/,„,  is  reached  (used  for  hybrid  model) 

Array  containing  20  times  the  logarithm  of  all  output  ranges 

Array  containing  all  desired  output  ranges 

Array  containing  the  square  of  all  desired  output  ranges 

Logical  flag  indicating  if  rough  sea  surface  calculations  are  required 
‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface  calculations 

Factor  used  for  wave  height  calculation 

RMS  sea  surface  wave  height  multiplied  by  2 ka 

Maximum  propagation  angle  used  in  PE  calculations 

75%  of  maximum  propagation  angle  in  PE  calculations 

Constant  used  in  determining  outgoing  propagation  angle  9ou, 

Ground  elevation  height  at  source 

Next  range  in  RO  region 

Fleight  limit  for  PE  calculation  region 

Array  containing  all  desired  output  heights  referenced  to  hmi„ter 

Array  output  heights  relative  to  “real”  antref 

Array  output  heights  relative  to  “image”  antref 

Array  of  output  heights  in  RO  region 

Fleight  in  PE  region  that  must  be  reached  for  hybrid  model 

Fleight  tolerance  for  Newton's  method 


Units 

N/A 

N/A 

dB/m 

radians 

meters 

N/A 

meters 

meters2 

N/A 


meters" 

meters"1 

radians 

radians 

N/A 

meters 

meters 

meters 

meters 

meters 

meters 

meters 

meters 

meters 


5.1.1  Allocate  Arrays  APM  (ALLARRAYAPM)  SU 

The  ALLARRAY  APM  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  the  APM  terrain,  refractivity,  troposcatter,  and  general  variable 
arrays. 


The  ALLARRAYAPM  SU  utilizes  the  FORTRAN  ALLOCATE  and 
DEALLOCATE  statements  to  dynamically  size  arrays  that  have  been  previously  declared 
with  the  ALLOC  AT  ABLE  attribute  in  the  APMMOD  MODULE  or  to  free  the  array 
storage  space  previously  reserved  in  an  ALLOCATE  statement.  Each  dimension  of  the 
ALLOCATABLE  array  is  indicated  by  a  colon  in  the  APM  MOD  module  (e.g., 
array( :)).  The  ALLOCATE  statement  establishes  the  upper  and  lower  bounds  of  each 
dimension  and  reserves  sufficient  memory.  Because  attempting  to  allocate  a  previously 
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allocated  array  causes  a  run-time  error,  each  ALLOCATE  statement  for  an  array  is 
preceded  by  a  test  to  determine  if  it  has  been  allocated.  If  it  has,  it  is  deallocated  before  it 
is  allocated. 

Initially,  the  integer  used  to  indicate  an  error,  i error,  is  set  to  zero.  If,  in  attempting 
to  allocate  an  array,  a  value  of  ierror  other  than  zero  is  returned  by  an  ALLOCATE 
statement,  the  SU  is  exited.  Note  that  each  array  that  is  dynamically  allocated  in  this  SU 
is  initialized  to  zero. 

Seven  integers  input  to  this  SU  are  used  to  dynamically  allocate  the  arrays.  Unless 
otherwise  indicated,  these  integers  are  used  as  the  single  dimension  of  the  dynamically 
allocated  array.  The  first,  igc,  is  the  number  of  yc  values  specified,  describing  the 
backscattering  effectiveness  of  the  surface.  The  second,  igr,  is  the  number  of  different 
ground  types  specified.  The  third,  itpa,  is  the  number  of  terrain  points  used  internally  in 
arrays  tx  and  ty.  The  fourth,  Ivlp,  is  the  number  of  levels  in  the  refractivity  profile.  The 
fifth,  nfacs,  is  the  number  of  user-defined  cut-back  antenna  pattern  factors  for  the  user- 
defined  height-finder  antenna  type.  The  sixth,  nrout,  is  the  integer  number  of  output  range 
points  desired.  And  finally,  the  seventh,  nzout,  is  the  integer  number  of  output  height 
points  desired. 

The  definitions  of  the  following  arrays  allocated  in  this  SU  are  given  in  Table  11. 
The  only  array  that  is  allocated  using  the  integer  nfacs  is  hfangr.  The  arrays  that  are 
allocated  using  the  integer  nrout  are  ffatlm,  rsqrd,fsl,  rlogo,  hlim,  htfe,  zxo,  and  rngout. 
The  arrays  that  are  allocated  using  the  integer  nzout  are  zout,  zoutma,  zoutpa,  rfacl,  rfac2, 
and  rloss.  Only  those  arrays  associated  with  the  hybrid  mode  of  execution  will  be 
allocated;  i.e.,  if  the  PE-only  mode  is  activated  (PE/iag  =  ‘.false’),  then  arrays  rsqrd, 
zoutma,  zoutpa,  hlim,  and  htfe  will  not  be  allocated. 

The  arrays  associated  with  terrain  information  use  the  integers  itpa,  igc,  or  igr.  The 
arrays  that  are  allocated  with  the  integer  itpa  are  tx,  ty,  and  sip.  The  arrays  allocated  using 
the  integer  igr  are  igrnd,  rgrnd,  and  nc2,  and  those  arrays  allocated  with  size  igc  are  yc  and 
yrng.  The  array  dielec  is  allocated  using  two  as  the  first  dimension  and  igr  as  the  second 
dimension.  While  arrays  igrnd,  rgrnd,  and  dielec  are  usually  specified  by  the  calling 
CSCI,  it  is  not  necessary  when  performing  an  over-water  case.  In  this  case,  igr  can  have  a 
value  of  0  and  these  arrays  will  be  defaulted  to  the  size  of  one  element  with  a  sea-surface 
ground  type. 

All  refractivity  arrays  used  in  the  PE  algorithm  are  allocated  using  the  integer  Ivlp 
and  include  refdum,  htdum,  grdum,  href,  and  refref 

The  arrays  associated  with  troposcatter  calculations  use  either  integers  nzout  and 
nrout  and  will  be  allocated  only  if  troposcatter  calculations  are  required  for  the  particular 
APM  CSCI  application  ( Tmpo  =  ‘.true.’).  The  arrays  allocated  using  the  integer  nzout 
include  adif  d2s,  rdt,  and  92s,  and  the  array  allocated  for  size,  nrout,  is  90. 
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Table  10  and  Table  1 1  provide  identification,  description,  units  of  measure,  and  the 
computational  source  for  each  ALLARRAY  APM  SU  input  and  output  data  element. 


Table  10.  ALLARRAY_APM  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Cun 

Clutter  calculation  flag: 

‘.false.’  =  do  not  compute  surface  clutter 
‘.true.’  =  compute  surface  clutter 

N/A 

Calling  CSCI 

Igc 

Number  of  yc  values  specified 

N/A 

Calling  CSCI 

lgr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

hpa 

Number  of  terrain  points  used  internally  in  terrain  profile 
arrays  tx,  ty 

N/A 

APMINIT  CSC 

lang 

Propagation  angle  and  factor  output  flag 

‘.tme.’=  Output  propagation  angle  and  propagation  factor 
for  direct  and  reflected  ray  (where  applicable). 

‘.false.’  =  Do  not  output  propagation  angles  and  factors 

N/A 

Calling  CSCI 

Ivlp 

Number  of  levels  in  refractivity  profile 

N/A 

Calling  CSCI 

Wfacs 

Number  of  user-defined  cut-back  angles  and  cut-back  antenna 
factors  for  user  specified  height-finder  antenna  type 

N/A 

Calling  CSCI 

Wrout 

Number  of  output  height  points  desired 

N/A 

Calling  CSCI 

M zout 

Number  of  output  range  points  desired 

N/A 

Calling  CSCI 

PE  flag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  mode 

N/A 

Calling  CSCI 

T 

J  ropo 

Troposcatter  calculation  flag: 

‘. false. ’=  no  troposcatter  calcs 
‘.true.’  =  troposcatter  calcs 

N/A 

Calling  CSCI 

Table  1 1 .  ALLARRAY_APM  SU  output  data  element  requirements. 


Name 

Description 

Units 

adif 

Height  differences  between  antref  and  all  output  receiver  heights 

meters 

d2s 

Array  of  tangent  ranges  for  all  output  receiver  heights  over  smooth  surface 

meters 

dielec 

Two-dimensional  array  containing  the  relative  permittivity  and  conductivity; 

N/A, 

dielec\j  and  dielec2,i,  respectively. 

S/m 

ffcitlm 

Propagation  factor  array  computed  at  1  m  above  the  surface. 

dB 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

yc 

Array  of  “backscattering  effectiveness”  values  used  in  computing  the 
reflectivity  over  land 

dB 

ymg 

Array  of  corresponding  ranges  for  each  yc  value 

meters 
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Table  11.  ALLARRAY_APM  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum  and  refdum 

M-units/ 

meter 

hfangr 

Cut-back  angles 

radians 

hlirn 

Array  containing  height  at  each  output  range  separating  the  RO  region  from 
the  PE  (at  close  ranges)  and  XO  (at  far  ranges)  regions 

meters 

href 

Heights  of  refractivity  profile  with  respect  to  yref 

meters 

htdum 

Height  array  for  current  interpolated  profile 

meters 

htfe 

Array  containing  the  height  at  each  output  range  separating  the  FE  region 
from  the  RO  region  (full  hybrid  mode),  or  the  FE  region  from  the  PE  region 
(partial  hybrid  mode) 

meters 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and 

DEALLOCATE  statements 

N/A 

igrnd 

Integer  array  containing  ground  type  composition  for  given  terrain  profile  - 
can  vary  with  range.  Different  ground  types  are: 

0  =  seawater 

1  =  freshwater 

2  =  wet  ground 

3  =  medium  dry  ground 

4  =  very  dry  ground 

5  =  ice  at  -1  degree  C 

6  =  ice  at  -10  degree  C 

7  =  user-defined  (in  which  case,  values  of  relative  permittivity  and 
conductivity  must  be  given). 

N/A 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 

rdt 

Array  of  minimum  ranges  at  which  diffraction  field  solutions  are  applicable 
(for  smooth  surface)  for  all  output  receiver  heights. 

meters 

refdum 

M-unit  array  for  current  interpolated  profile 

M-units 

refref 

Refractivity  profile  with  respect  to  yref 

M-units 

rfacl 

Propagation  factor  at  valid  output  height  points  from  PE  field  at  range  r\ast. 

dB 

rfac2 

Propagation  factor  at  valid  output  height  points  from  PE  field  at  range  r 

dB 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types  apply 

meters 

rlogo 

Array  used  for  storing  20  LOGi0(output  ranges) 

N/A 

rloss 

Propagation  loss 

dB 

rngout 

Array  containing  all  desired  output  ranges 

meters 

rsqrd 

Array  containing  the  square  of  all  desired  output  ranges 

meters2 

sip 

Slope  of  each  segment  of  terrain 

N/A 

90 

Array  of  angles  used  to  determine  common  volume  scattering  angle 

radians 

92s 

Array  of  tangent  angles  from  all  output  receiver  heights  -  used  with  smooth 
surface 

radians 

tx 

Range  points  of  terrain  profile 

meters 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

zout 

Array  containing  all  desired  output  heights  referenced  to  hmmk,r 

meters 
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Table  1 1 .  ALLARRAY_APM  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

zoutma 

Array  output  heights  relative  to  “real”  antref 

meters 

zoutpa 

Array  output  heights  relative  to  “image”  antref 

meters 

zxo 

Height  of  the  ground  at  the  current  output  range  step 

meters 

5.1.2  Allocate  Array  PE  (ALLARRAYPE)  SU 

The  ALLARRAY  PE  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  PE  calculations. 

The  ALLARRAYPE  SU  utilizes  the  FORTRAN  ALLOCATE  and 
DEALLOCATE  statements  to  dynamically  size  arrays  that  have  been  previously  declared 
with  the  ALLOCATABLE  attribute  in  the  APMMOD  module  or  to  free  the  array 
storage  space  previously  reserved  in  an  ALLOCATE  statement.  Each  dimension  of  the 
ALLOCATABLE  array  is  indicated  by  a  colon  in  the  APM  MOD  MODULE  (e.g., 
army (\)).  The  ALLOCATE  statement  establishes  the  upper  and  lower  bounds  of  each 
dimension  and  reserves  sufficient  memory.  Because  attempting  to  allocate  a  previously 
allocated  array  causes  a  run-time  error,  each  ALLOCATE  statement  for  an  array  is 
preceded  by  a  test  to  determine  if  it  has  been  allocated.  If  it  has,  it  is  deallocated  before  it 
is  allocated. 

Initially,  the  integer  used  to  indicate  an  error,  ierr0r,  is  set  to  zero.  If  in  attempting 
to  allocate  an  array,  a  value  of  ierTOr  other  than  zero  is  returned  by  an  ALLOCATE 
statement,  then  the  SU  is  exited.  Note  that  each  array  that  is  dynamically  allocated  in  this 
SU  is  initialized  to  zero. 

Three  integers  input  to  this  SU  are  used  to  dynamically  allocate  the  arrays.  Unless 
otherwise  indicated,  these  integers  are  used  as  the  single  dimension  of  the  dynamically 
allocated  array.  The  first,  n/ft,  is  the  transfonn  size.  The  second,  n4,  is  the  transform  size 
riffi  divided  by  four.  The  third,  nzout_rtg,  is  the  number  of  receiver  heights  specified  relative 
to  the  local  surface  elevation  and  is  used  to  allocate  the  rlossrtg  array. 

The  definitions  of  the  following  arrays  allocated  in  this  SU  are  given  in  Table  13. 
The  arrays  that  are  allocated  using  the  integer  ngt  are  envpr,  frsp ,  U,  Ulast,  ht,  profint, 
udum,  rn,  w,  and  yin.  The  only  array  allocated  using  the  integer  n4  is  filt.  If  rough  sea 
surface  or  finite  conductivity  calculations  are  not  required  (ruf  =  ‘.false.’  and  ipoi  =  0), 
then  arrays  rn,  w,  and  ym  will  not  be  allocated. 

Table  12  and  Table  13  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ALLARRAY  PE  SU  input  and  output  data  element. 
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Table  12.  ALLARRAY_PE  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being  used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 

tpol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

Irtg 

Logical  flag  indicating  if  loss  relative  to  the  local  ground 
height  needs  to  be  computed. 

‘.true.’  =  Compute  loss  relative  to  ground  at  heights 
specified  by  array  zoutrtg. 

‘.false.’  =  Do  not  compute  loss. 

N/A 

APMINIT  CSC 

riff, 

Transform  size 

N/A 

FFTPAR  SU 

n4 

14  nfft 

N/A 

APMINIT  CSC 

Wzout_rtg 

Number  of  output  receiver  heights  specified  relative  to  the 
local  surface  elevation. 

N/A 

Calling  CSCI 

ruf 

Logical  flag  indicating  if  rough  sea  surface  calculations  are 
required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface  calculations 

N/A 

APMINIT  CSC 

Table  13.  ALLARRAY_PE  SU  output  data  element  requirements. 


Name 

Description 

Units 

envpr 

Complex  [refractivity]  phase  term  array  interpolated  every  Azpe  in  height 

N/A 

filt 

Cosine-tapered  (Tukey)  filter  array 

N/A 

frsp 

Complex  free  space  propagator  term  array 

N/A 

ht 

PE  mesh  height  array  of  size  nyi 

meters 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and  DEALLOCATE 
statements 

N/A 

profint 

Profile  interpolated  to  every  Azpp  in  height 

M-units 

rlossrtg 

Propagation  loss  computed  relative  to  the  local  ground  height  at  heights 
specified  by  zout  rtg 

dB 

rn 

Array  of  RT  to  the  i"'  power  (e.g.,  r«,  =  R'T) 

N/A 

U 

Complex  field  at  current  PE  range  r 

pV/m 

Udum 

Dummy  array  used  for  temporary  storage  of  real  or  imaginary  part  of  complex 

PE  field  array  U 

pV/m 

Ulast 

Complex  field  at  previous  PE  range  r/asl 

pV/m 

w 

Difference  equation  of  complex  PE  field 

pV/m 

ym 

Particular  solution  of  difference  equation 

N/A 
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5.1.3  Allocate  Array  RO  (ALLARRAYRO)  SU 

The  ALLARRAY  RO  SU  allocates  and  initializes  all  dynamically  dimensioned 
arrays  associated  with  RO  calculations. 

The  ALLARRAYRO  SU  utilizes  the  FORTRAN  ALLOCATE  and 
DEALLOCATE  statements  to  dynamically  size  arrays  that  have  been  previously  declared 
with  the  ALLOC  AT  ABLE  attribute  in  the  APMMOD  MODULE  or  to  free  the  array 
storage  space  previously  reserved  in  an  ALLOCATE  statement.  Each  dimension  of  the 
ALLOCATABLE  array  is  indicated  by  a  colon  in  the  APM  MOD  module  (e.g., 
array( :)).  The  ALLOCATE  statement  establishes  the  upper  and  lower  bounds  of  each 
dimension  and  reserves  sufficient  memory.  Because  attempting  to  allocate  a  previously 
allocated  array  causes  a  run  time  error,  each  ALLOCATE  statement  for  an  array  is 
preceded  by  a  test  to  determine  if  it  has  been  allocated.  If  it  has,  it  is  deallocated  before  it 
is  allocated. 

Initially,  the  integer  used  to  indicate  an  error,  ie,ror,  is  set  to  zero.  If  in  attempting 
to  allocate  an  array,  a  value  of  ierror  other  than  zero  is  returned  by  an  ALLOCATE 
statement,  then  the  SU  is  exited.  Note  that  each  array  that  is  dynamically  allocated  in  this 
SU  is  initialized  to  zero. 

Two  integers  input  to  this  SU  are  used  to  dynamically  allocate  the  arrays.  Unless 
otherwise  indicated,  these  integers  are  used  as  the  single  dimension  of  the  dynamically 
allocated  array.  The  first  of  these  is  Ivlp,  the  number  of  points  in  the  refractivity  profile, 
and  the  second  is  nzouh  which  is  the  number  of  output  height  points  desired. 

The  definitions  of  the  following  arrays  allocated  in  this  SU  are  given  in  Table  15. 
The  array  zro  is  allocated  using  the  integer  nzout.  The  remainder  of  the  arrays  associated 
with  refractivity  information,  gr,  q,  rm,  and  zrt,  are  allocated  using  the  integer  Ivlpt, 
which  is  equal  to  Ivlp  plus  one. 

Table  14  and  Table  15  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ALLARRAY  RO  SU  input  and  output  data  element. 


Table  14.  ALLARRAY_RO  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Ivlp 

Number  of  levels  in  refractivity  profile 

N/A 

Calling  CSCI 

W-ZOUt 

Number  of  desired  output  height  points 

N/A 

Calling  CSCI 
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Table  15.  ALLARRAY_RO  output  data  element  requirements. 


Name 

Description 

Units 

gf 

Intermediate  M-unit  gradient  array 

M-units/meter 

q 

Intermediate  M-unit  difference  array 

M-units 

rm 

Intermediate  M-unit  array 

M-units 

zro 

Array  of  output  heights 

meters 

zrt 

Intermediate  height  array 

meters 

5.1.4  Allocate  Array  XORUF  (ALLARRAYXORUF)  SU 

The  ALLARRAYXORUF  SU  allocates  and  initializes  all  dynamically 
dimensioned  arrays  associated  with  XO  and  rough  sea  surface  calculations. 

The  ALLARRAY  XORUF  SU  utilizes  the  FORTRAN  ALLOCATE  and 
DEALLOCATE  statements  to  dynamically  size  arrays  that  have  been  previously  declared 
with  the  ALLOC  AT  ABLE  attribute  in  the  APMMOD  MODULE  or  to  free  the  array 
storage  space  previously  reserved  in  an  ALLOCATE  statement.  Each  dimension  of  the 
ALLOCATABLE  array  is  indicated  by  a  colon  in  the  APM  MOD  module  (e.g., 
array (\)).  The  ALLOCATE  statement  establishes  the  upper  and  lower  bounds  of  each 
dimension  and  reserves  sufficient  memory.  Because  attempting  to  allocate  a  previously 
allocated  array  causes  a  run  time  error,  each  ALLOCATE  statement  for  an  array  is 
preceded  by  a  test  to  determine  if  it  has  been  allocated.  If  it  has,  it  is  deallocated  before  it 
is  allocated. 

Initially,  the  integer  used  to  indicate  an  error,  ierror,  is  set  to  zero.  If  in  attempting 
to  allocate  an  array,  a  value  of  ierror  other  than  zero  is  returned  by  an  ALLOCATE 
statement,  then  the  SU  is  exited.  Note  that  each  array  that  is  dynamically  allocated  in  this 
SU  is  initialized  to  zero. 

Six  integers  input  to  this  SU  are  used  to  dynamically  allocate  the  arrays.  Unless 
otherwise  indicated,  these  integers  are  used  as  the  single  dimension  of  the  dynamically 
allocated  array.  The  first  of  these  is  ixo  and  is  the  number  of  XO  range  step  calculations 
required.  The  second  is  izmax,  the  maximum  number  of  points  allocated  for  arrays 
associated  with  XO  calculations.  The  third  is  Ivlp,  the  number  of  points  in  the  refractivity 
profile.  The  fourth  is  np 4,  1/4  of  the  number  of  points,  np,  used  in  the  top  or  bottom 
portion  of  the  PE  region  for  spectral  estimation.  The  fifth  is  nrout,  the  number  of  output 
range  points  desired,  and  the  last  is  ns,  the  transfonn  size  used  in  spectral  estimation 
calculations  (i.e.,  ns=2lnp),  where  the  integer  lnp  is  the  power  of  2  transfonn  size. 


The  definitions  of  the  following  arrays  allocated  in  this  SU  are  given  in  Table  17. 
The  array  ffrout  is  allocated  using  the  integer  nrout  as  the  first  dimension  and  two  as  the 
second  dimension.  The  integer  izmax  is  used  as  the  first  dimension  limit,  and  the  integer 
three  is  used  as  the  second  dimension  in  the  allocation  of  the  array  ffacz.  Both  of  the 
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arrays,  grad  and  htr  are  allocated  with  the  first  dimension  given  by  Ivlp  and  the  second 
dimension  given  by  izmax.  The  array  Ivl  is  allocated  using  the  integer  izmax.  The  array  filtp 
is  allocated  using  the  integer  np 4.  The  three  arrays  xp,  vp,  and  spectr  are  allocated  using 
the  integer  ns. 

If  no  XO  calculations  are  required  (ixo  =  0)  then  the  arrays  ffrout,  ffacz,  grad,  htr, 
and  Ivl  will  not  be  allocated. 

Table  16  and  17  provide  identification,  description  units  of  measure,  and  the 
computational  source  for  each  ALLARRAY  XORUF  SU  input  and  output  data  element. 


Table  16.  ALLARRAY_XORUF  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Ixo 

Number  of  range  steps  in  XO  calculation  region 

N/A 

APMINIT  CSC 

l^max 

Maximum  number  of  points  allocated  for  arrays  associated 
with  XO  calculations 

N/A 

APMINIT  CSC 

Ivlp 

Number  of  height/refractivity  levels  in  profiles 

N/A 

Calling  CSCI 

Tip  4 

'Anp 

N/A 

APMINIT  CSC 

Mrout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

ns 

Transform  size  for  spectral  estimation  calculations 

N/A 

APMINIT  CSC 

Table  17.  ALLARRAY_XORUF  SU  output  data  element  requirements. 


Name 

Description 

Units 

ffacz 

Two-dimensional  array  containing  propagation  factor,  range,  and  outgoing 
propagation  angle  at  Z\im 

dB,  meters, 
radians 

ffrout 

Two-dimensional  array  of  propagation  factors  at  each  output  range  beyond 
r at:  and  at  height  zHm 

dB 

filtp 

Array  filter  for  spectral  estimation  calculations 

N/A 

grad 

Two-dimensional  array  containing  gradients  of  each  profile  used  in  XO 
calculations 

M-units/  meter 

htr 

Two-dimensional  array  containing  heights  of  each  profile  used  in  XO 
calculations 

meters 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and 
DEALLOCATE  statements 

N/A 

Ivl 

Number  of  height  levels  in  each  profile  used  in  XO  calculations 

N/A 

spectr 

Spectral  amplitude  of  field 

dB 

xp 

Real  part  of  spectral  portion  of  PE  field 

pV/m 

yp 

Imaginary  part  of  spectral  portion  field 

pV/m 
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5.1.5  Alpha  Impedance  Initialization  (ALNINIT)  SU 

The  ALN_INIT  SU  initializes  variables  and  arrays  used  for  the  backward  or 
central  difference  fonn  of  the  DMFT  algorithm.  The  DMFT  algorithm  is  used  only  for 
finite  conductivity  and/or  rough  sea  surface  calculations. 

Upon  entering,  the  GETALN  SU  is  referenced  to  obtain  the  surface  impedance, 
as,  the  complex  root  R-/,  the  array  rn  containing  the  powers  of  the  complex  root,  and  a 
coefficient  R/-  used  in  the  central  difference  algorithm.  These  variables  are  computed 
from  the  grazing  angle  i//  and  current  range,  which,  for  initialization  purposes  are  set 
equal  to  %  and  0,  respectively. 


If  the  central  difference  algorithm  is  required  (iaig=  1)  for  the  particular  APM 
CSCI  application,  then  coefficients  necessary  for  this  fonn  of  the  DMFT  are  computed  as 
follows: 


ck{  =  Rk 


ck2  =Rk 


.5(1 


U0  +U  rn 


\ 

)+Yjuirni 


i= 1 


/  \  nml 

.5  [Uam„  +U„  +V-1'U 

V  0  nfft  nfft  1  Z_J  '  '  nm~l 


rn. 


i= 1 


If  the  backward  difference  algorithm  is  required  (iaig= 2)  for  the  particular  APM 
CSCI  application,  then  the  variable  cmft  is  initialized  using  the  starting  PE  field  U  and  the 
array  rn  according  to 


« ml 

cmft  =  y'Uirni  . 

i= 1 

Table  18  and  Table  19  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ALN  INIT  SU  input  and  output  data  element. 


Table  18.  ALNJNIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

V 

Grazing  angle 

radians 

APMINIT  CSC 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being  used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 

r 

Current  range 

meters 

APMINIT  CSC 

M-ml 

Uffl-l 

N/A 

APMINIT  CSC 
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Table  18.  ALNJNIT  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

Rk 

Constant  used  to  compute  coefficients  in  central  difference 
form  of  the  DMFT 

N/A 

GETALN  SU 

rn 

Array  ofiGto  the  f‘  power  (e.g.,  rrij  =  Rp) 

N/A 

GETALN  SU 

U 

Complex  field  at  current  PE  range  r 

|iV/m 

XYINIT  SU 

Table  19.  ALNJNIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

ckj 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

ck2 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

cmft 

Coefficient  used  in  backward  difference  form  of  DMFT 

N/A 

5.1.6  Antenna  Pattern  (ANTPAT)  SU 

The  ANTPAT  SU  calculates  an  antenna  pattern  factor  (normalized  antenna  gain), 
J[a),  for  a  specified  antenna  elevation  angle,  a.  Currently,  antenna  pattern  factors  are 
included  for  seven  types  of  antennas.  These  patterns  include  an  omnidirectional  (ipat=  1 ) 
type;  a  Gaussian  (ipa  t=  2)  type;  a  Sin(X)/X  (ipat= 3)  type;  a  cosecant-squared  {ipat  =  4) 
type;  a  generic  height-finder  ( ipa  t  =  5)  type;  a  user-defined  height-finder  type  (ipat  =  6), 
in  which  the  calling  CSCI  must  also  specify  an  array  of  cut-back  angles  and  pattern 
factors;  a  user-defined  antenna  type  (ipat  =  7),  in  which  the  calling  CSCI  must  specify  an 
array  of  antenna  pattern  factors  and  angles;  and  finally,  a  quarter-wave  dipole  antenna 
type  ( iPat  =8),  suitable  for  HF  applications. 

From  two  antenna  pattern  quantities  determined  in  the  APMINIT  CSC,  antjac  and 
peiev\  the  antenna  beam  width,  /ubwr,  and  elevation  angle,  por\  a  specified  angle,  a,  for 
which  the  antenna  pattern  factor  is  desired;  and  the  antenna  radiation  pattern  type,  ipat, 
the  antenna  pattern  factor  is  calculated  as  follows. 

If  the  antenna  pattern  is  omnidirectional,  then / (a)  =  1.  If  the  antenna  pattern  is 
Gaussian,  then 


f(a)=  e~ant  fac  ^SIN  ^  ^ ~Pelev  ^ 


If  the  antenna  pattern  is  cosecant-squared,  compute  the  elevation  angle  relative  to 
the  antenna  elevation  angle  as 


^  pat  =a~  Mot- 


53 


The  antenna  pattern  is  now  given  as 


/(«) 


sinUJ 

SIN(a„„)  ’ 


for  GCpat  >  f-i[)wr , 


MAX 

0.0, 

1 - 

+ 

i _ 

V 

L  Mbwr  \) 

for  apat  <  0, 


f(a)  =  1  otherwise. 


If  the  antenna  pattern  is  Sin(X)/X,  a  generic  height-finder,  or  a  user-specified 
height-finder,  the  following  calculations  are  made: 

1.  The  elevation  angle  relative  to  the  antenna  elevation  angle,  apat,  is  determined  as  in 
the  previous  definition.  If  the  antenna  radiation  pattern  type  is  a  generic  or  user- 
specified  height-finder,  the  radiation  pattern  is  simulated  as  a  Sin(X)/X  type  with  the 
elevation  angle  adjusted  to  account  for  the  current  pointing  angle  of  the  main  beam, 
X-  X  is  set  equal  to  the  antenna  elevation  angle  /uor.  If  the  direct-path  ray  angle,  ad,  is 
greater  than  the  antenna  elevation  angle,  then  apat  is  computed  as  apat  =  a  -  ad  and  x 
is  set  equal  to  ad. 


2.  The  antenna  pattern  is  now  given  as 


/(«)  =  ! 


for 


a 


pat 


<  IQ'6 


/(«)  = 


SIN  [antfac  Sm(a  )J 

antfac  ) 


for 


a 


pat 


f{cc)=  sidelim ,  otherwise, 


where  sidenm  is  0.03  for  a  Sin(x)/x  antenna  pattern,  and  0.0  otherwise. 

For  a  user-defined  height-finder,  the  pattern  factor  is  further  adjusted  by  a  power 
reduction  factor,  hffac,,  as 

/(«)  =  /(«)  hffac,  i  =  nfacs,  ...  .2,  1 
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where  i  is  an  angle  counter,  decremented  by  one  from  the  number  of  power  reduction 
angles,  njacs  ,  for  each  power  reduction  angle,  hfangrh  which  exceeds 

For  the  user-defined  antenna  type,  the  antenna  pattern  factor  is  simply  the  array 
hffac  provided  by  the  calling  CSCI  at  angles  hfangr,  where  pattern  factors  are 
interpolated  from  hffac  for  angles  a  within  hfangr. 

Finally,  for  the  quarter-wave  dipole  antenna  pattern,  the  antenna  pattern  factor  is 
defined  as 


i„=SIN(|4c„=COS(|aD 


sr=ncx  sa 


r „=sr  -c 

t4=  TAN 


,  Vd  =sr  +cr 


1  \t  -TAN 


«(r ,)’ 


3(rJ 

w(rj 


e„=COS(^s„),  t,  =  tt-!,+nsa 
-erCOS(/,),£1=o.,rSIN(/,) 


f(a)=yfE.2+E,2 


Table  20  and  Table  21  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ANTPAT  SU  input  and  output  data  element. 


Table  20.  ANTPAT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

antfac 

Antenna  pattern  parameter  (depends  on  ipat  and  jUinvr) 

N/A 

APMINIT  CSC 

a 

Antenna  elevation  angle 

radians 

Calling  SU 

ad 

Direct  ray  elevation  angle 

radians 

FEDR  SU 

FEM  SU 
ROCALC  SU 
TROPOINIT  SU 
TROPOSCAT  SU 
XYINIT  SU 
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Table  20.  ANTPAT  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

hfangr 

Cut-back  angles  if  ipat  =  6; 

Antenna  pattern  angles  if  ipat  =  7 

radians 

Calling  CSCI 

hffac 

Cut-back  antenna  pattern  factors  if  ipat  =  6; 

Antenna  pattern  factors  if  ipat  =  7 

N/A 

Calling  CSCI 

Ipat 

Antenna  pattern  type 

1  =  Omnidirectional 

2  =  Gaussian 

3  =  Sine(x)/x 

4  =  Cosecant-squared 

5  =  Generic  height-finder 

6  =  User-defined  height-finder 

7  =  User-defined  antenna  pattern 

N/A 

Calling  CSCI 

Por 

Antenna  pattern  (pointing)  elevation  angle 

radians 

APMINIT  CSC 

{J'bwr 

Antenna  vertical  beam  width 

radians 

APMINIT  CSC 

Pmax 

Limiting  angle  for  Sin(X)/X  and  generic  height  finder 
antenna  pattern  factors 

radians 

APMINIT  CSC 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 

DIEINIT  SU 

Wfacs 

Number  of  user-defined  cut-back  angles  and  cut-back 
pattern  factors 

N/A 

Calling  CSCI 

Pelev 

Sine  of  antenna  elevation  angle 

N/A 

APMINIT  CSC 

Table  21 .  ANTPAT  SU  output  data  element  requirements. 


Name 

Description 

Units 

/(«) 

Antenna  pattern  factor  for  elevation  angle  a 

N/A 

5.1.7  APM  Status  (APMSTATUS)  SU 

This  SU  is  supplied  with  the  APM  CSCI  and  should  be  declared  as  an  external 
subroutine.  It  is  called  from  the  GETANGLES  SU  as  a  means  of  checking  the  status  of 
the  algorithm  for  computing  grazing  angles,  as  this  can  be  time-intensive  before  the 
actual  propagation  loss  calculations  are  performed. 

5.1.8  Dielectric  Initialization  (DIEINIT)  SU 

The  DIEINIT  SU  determines  the  conductivity  and  relative  permittivity  as  a 
function  of  frequency  in  megahertz,  based  on  general  ground  composition  types. 

The  DIEINIT  SU  supports  the  following  general  ground  types:  salt  water,  fresh¬ 
water,  wet  ground,  medium  dry  ground,  very  dry  ground,  ice  at  -1  °C,  ice  at  -10  °C,  and 
user-defined.  For  all  ground  types  other  than  “user-defined,”  the  permittivity  and 
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conductivity  are  calculated  as  functions  of  frequency  from  curve  fits  to  the  permittivity 
and  conductivity  graphs  shown  in  the  Recommendations  and  Reports  of  the  International 
Radio  Consultative  Committee  (CCIR,  1986).  For  the  7th  input  ground  type  case,  igrndi, 
the  pennittivity  sr  and  conductivity  cr  are  determined  as  follows: 


For  salt  water  ( igrndi  =  0),  the  relative  permittivity  is  given  by  70  for 
fMH_  <2253.5895;  and  the  conductivity  is  given  by  5.0  S/m  for  fMH_  <  1106.207.  For 
fMHz  >  2253.5895 ,  the  relative  permittivity  is  given  by 


1.41 14535  x  10~2  -  5.2122497  x  10  \fMHz  +  5.8547829  x  10  "  fMHz 
-  7.6717423  x  10-16/^  +2-9856318  x  10 ~21  fAMH: 


For  fMHz  >  1 106.207  ,  the  conductivity  cr  in  S/m  is  given  by 


3.8586749  +  9.1253873  x  10 ^  fMHz  + 1,530992  x  10~8/^z _ 

^  '  1-2.1 179295  x  10-5/MHz  +  6.5727504  x  10 -10  fMHz  - 1.9647664  x \Q~'5  fMHz 

For  freshwater  ( igrndi  =  1),  the  relative  permittivity  sr  is  given  by  80  for 
fMHz  <  6165.776 .  For  higher  frequencies,  sr  is  given  by 


79.027635-  3.5486605  x \^fMHz+  8.210184  x  10~9  f2MHz 
£r  ~  1.-2.2083308  x  UV5  fMHz  +  2.7067836  x  10  9/m//z  "  1-0007669  x  10 fMHz  ' 

For  fMHZ  >  5776.157  ,  the  conductivity  cr  in  S/m  is  given  by 


f-.6575035 1  +  6.61 13 198  x  10 ^  fMHz  + 1.4876952  x  10~9/^^ 
1.+5.5620223  x  l0^5fMH,  +3.0140816  x  l0  mf^Hz  > 

For  fMHZ  <  5776.157  ,  the  conductivity  cr  in  S/m  is  given  by 


"201.97103  +  1.2197967  x  10 ~2  fMHz  -  1.728776  x  10~6/^  V‘ 
v  1.-2.5539582  x  10^  fMHz  -3.7853169  x  105  f^Hz  , 
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For  wet  ground  ( igrndt  =  2),  the  relative  pennittivity  sr  is  given  by  30  for 
fMH_  <  13 12.054 .  For  13 12.054  <  fMH_  <  4228.1 1 ,  the  relative  pennittivity  sr  is  given  by 


857.94335  +  5.5275278  x  1 0  zfMHz 


8  rl 


1.-8.9983662  x  10  \fMHz  +  8.8247139  x  10 ~*ft 


MHz 


For  /,,,,  >  4228.1 1 ,  the  relative  pennittivity  s .  is  given  by 


1915.3 1026  -  4.034821 1  x  10 ^  fUHz  +  7.4342897  x  10 
~  \  1.-9.4530022  x fMHz  + 4.892281  x fMHz 

For  fMH_  >  15454.4 ,  the  conductivity  a  in  S/m  for  wet  ground  is  given  by 


a  =  0.8756665  +  4.7236085  x  10  5/m/*  +2.6051966  x  10 ~8/ik 
-9.235936  x  10 n  fMHz  +  1.4560078  x  10 ^  fMHz 
-  1.1 129348  x  10 ~22fMH:  +  3.3253339  x  10 ~2*  fMHz . 

For  fMHz  <  15454.4 ,  the  conductivity  <j  in  S/m  for  wet  ground  is  given  by 


a  =  5.5990969  x  10  3  +  8.7798277  x  10~5  fUHz  +  6.2451017  x  10 ^  f2MHz 
-  7.1317207  x  lO-12/^,  +4-2515914  x  10 ^  fMHz 
- 1.240806  x  10 -20f5MHz  + 1.3854354  x  10 f6MHz . 

For  medium  dry  ground  ( igrndi  =  3),  the  relative  pennittivity  sr  is  given  by  15  for 
fMHz  <  4841.945  .  For  fMHz  >  4841.945 ,  the  relative  permittivity  sr  is  given  by 


1 2 1 5.8752 1  -  2.6 1 5 1 05 5  x  1 0^  fMHz  +  1.9484482  x  1 0~7  f2~ 

£r  “  V  1.-7.6649237  x  10 ^  fMHz  +  1.2565999  x  10 ^  fMHz 

At  fMHz  <  4946.751  for  medium  dry  ground,  the  conductivity  cr  in  S/m  is  given  by 


a  =  (2.4625032  x  10~2  +  1.8254018  x  10 fMHz  -  2.664754  x  10 f2MHz 
+  7.6508732  x  10  n  flHz  -  7.4193268  x  10 ~16  fAMHzY  ■ 
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For  fMH_  >  4946.75 1 ,  for  medium  dry  ground,  the  conductivity  cr  in  S/m  is  given  by 


cr  =  (0.17381269  +  1.2655183  x  10 fMHz  -  1.6790756  x  10~9  f2Hz 
+  1.1037608  x \0-14fMHz  -  2.9223433  x  \0~20  f4MHz)2 . 

For  very  dry  ground  ( igrndt  =  4),  the  relative  pennittivity  er  is  given  by  3  and  the 
conductivity  cr  in  S/m  is  0.0001  for  fMHz  <  590.8924  .  For  590.8924  <  fMHz  <  7131.933 , 
the  conductivity  cr  in  S/m  is  given  by 

a  =  2.2953743  x  lO^4  -  8.1212741  x  10  1  fMH:  +  1.8045461  x  10 ~9  f2MHz 
- 1.960677  x  10 -nfMH:  +  1.256959  x  1015/^z  -  4.4681 1  x  10 fMHz 
+  9.4623158  x  1  O'23  fMHz  -1.1787443  x lO'26/^  +  7.9254217  x  10  3I/^Z 

-  2.2088286  xlO^/L- 

For  fMHz  >  7131.933  MHz,  the  conductivity  cr  in  S/m  is  given  by 


a  =  (-4.9560275  x  10“2  +  2.9876572  x  10 ~5  fMH:  -  3.0561848  x  10 flH: 

+  1.1131828  x  10 

For  ice  at  -1°C  ( ignidj  =  5),  the  relative  pennittivity  sr  is  3  for  all  frequencies, 
and  the  conductivity  cr ,  for  fMH,  <300 ,  is  given  by 


3.8814567  x  10^+9.878241  x  10 fMH:  +7.9902484  x  10^/^ 

1  +  8.467523  x  10  2/M//z  -9.736703  x  lO  5/^  +  3.269059  x  10 -1  fMHz  ’ 


and  for  fMHz  >300  is  given  by 


1.2434792  x  10~4  +  8.680839  x  10 ~7  fMHz  +  7.2701689  x  10 ~n  fMH:  -  2.6416983  x  10 ~H  fMH;  + 1.37552  x  10 fAMH: 
1  +  2.824598  x  10"4/M/t -6.755389  x  10“8/m//z  +2.8728975  x  10"12/^ -1.8795958  x  lO"18/^ 


For  ice  at  -10°  C  ( igrndt  =  6),  the  relative  pennittivity  sr  is  3  for  all  frequencies, 
and  the  conductivity  cr ,  for  fMH,  <8753.398 ,  is  given  by 

1  +  3.883854  xlO~2/M/fc  +  6.832 108  x  10'5  fMHz 
51852.543  +  389.58894 fMHz 
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and  for  fMHz  >8753.398 ,  is  given  by 


cr=4.13105  x  1CT5  +  2.03589  x  10 fMHz  -3.1739  x \0n  fMHz  +4.5233 1  x  1CT17/m&  • 


For  the  user-defined  ground  type  (igrnd j  =  7),  the  relative  pennittivity  sr  and  the 
conductivity  <j  in  S/m  are  set  equal  to  the  input  values  dielec y  and  dielec2j,  respectively. 


Finally,  the  complex  dielectric  constant  is  given  by 

nc;  =  sn  +  60 Act,.;  for  i  =  1,2,3, . . . igr. 


Table  22  and  Table  23  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  DIEINIT  SU  input  and  output  data  element. 


Table  22.  DIEINIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

dielec 

Two-dimensional  array  containing  the  relative  permittivity 
and  conductivity;  dielec\j  and  dielec2j,  respectively. 

N/A, 

S/m 

Calling  CSCI 

j MHz 

Frequency 

MHz 

APMMOD 

lgr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

igrnd 

Integer  array  containing  ground  type  composition  for  given 
terrain  profile  -  can  vary  with  range.  Different  ground  types 
are: 

0  =  seawater 

1  =  freshwater 

2  =  wet  ground 

3  =  medium  dry  ground 

4  =  very  dry  ground 

5  =  ice  at  -1  degree  C 

6  =  ice  at  -10  degree  C 

7  =  user-defined  (in  which  case,  values  of  relative 
permittivity  and  conductivity  must  be  given). 

N/A 

Calling  CSCI 

2 

Wavelength 

meters 

APMINIT  CSC 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types 
apply. 

meters 

Calling  CSCI 

Table  23.  DIEINIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 
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5.1.9  FFT  Parameters  (FFTPAR)  SU 

The  FFTPAR  SU  determines  the  required  transform  size  based  on  the  maximum 
PE  propagation  angle  and  the  maximum  height  needed  for  desired  coverage.  If  running  in 
full  or  partial  hybrid  modes,  the  maximum  height  is  the  height  necessary  to  encompass  at 
least  20%  above  the  maximum  terrain  peak  along  the  path  or  the  highest  trapping  layer 
specified  in  the  environment  profiles,  whichever  is  greater.  If  running  in  a  PE-only  mode, 
the  maximum  height  is  the  specified  maximum  output  height. 

For  computational  efficiency  reasons,  an  artificial  upper  boundary  is  established 
for  the  PE  solution.  To  prevent  upward  propagating  energy  from  being  "reflected" 
downward  from  this  boundary  and  contaminating  the  PE  solution,  the  PE  solution  field 
strength  is  attenuated  or  "filtered"  above  a  certain  height  to  ensure  that  the  field  strength 
just  above  this  boundary  is  reduced  to  zero.  The  bin  width  in  z-space  A zPE  is  found  from 

AZ™=2SIN(S„)’ 


where  X  is  the  wavelength  in  meters  and  0max  is  the  maximum  propagation  angle  in 
radians. 

The  flag,  ifiag,  is  used  to  determine  maximum  FFT  size  based  on  a  given  0max  and 
desired  coverage  height  zu,n  or  it  will  detennine  z//m  based  on  a  given  0max  and  FFT  size. 

For  iflag=  0,  the  constants  lnjft,  njft,  and  zmax  are  found  from  lnmm  as  follows, 


lnff,  =  ln,mm 


n  =  2  fft 

Hfft  ^  > 

Z  —  / 1  rr  AZ  DV  - 
max  fft  PE 1 


where  himin  is  the  minimum  power  of  two  transfonn  size.  Inmin  is  initialized  to  10  and  for 
every  5°  in  0max  is  increased  by  1.  Next,  the  transform  size  needed  to  perform 
calculations  to  a  test  height  zt  is  determined.  First,  z,  is  set  equal  to  z/(m  minus  a  small 
height  precision  tolerance.  Then  a  DO  WHILE  loop  is  executed  as  long  as  the  condition 
%  zmax  <  z,  is  satisfied.  Within  this  DO  WHILE  loop  zmax  is  found  from 


lnfft  =  lnffi  +  ', 

n  =  2/H# 

.fft  ’ 


z  —  /?■ ....  A~ .... . 

maz  fft  !E 


If  lnfft  reaches  the  value  of  30,  then  the  SU  is  exited  with  a  non-zero  error  code. 
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For  the  case  where  ifiag=  1,  no  iteration  needs  to  be  perfonned.  z/„„  is  determined 
by  a  given  lnjft  and  0max  from  equations  shown  above. 

Upon  exiting,  z/,m  is  computed  as  3/4  zmax. 

Table  24  and  Table  25  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FFTPAR  SU  input  and  output  data  element. 


Table  24.  FFTPAR  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

iflag 

Flag  indicating  whether  to  determine  maximum  FFT  size 
phased  on  given  0max  and  zUm  or  determine  zUm  based  on 
given  0max  and  FFT  size  Hfft. 

N/A 

APMINIT  CSC 
GETTHMAX  SU 

A 

Wavelength 

meters 

APMINIT  SU 

lit  ■ 

inmin 

Minimum  power  of  2  transform  size 

N/A 

APMINIT  SU 

®max 

Maximum  propagation  angle  in  PE  calculations 

radians 

APMINIT  CSC 
GETTHMAX  SU 

Zlim 

Maximum  height  region  where  PE  solution  is  valid 

meters 

APMINIT  CSC 
GETTHMAX  SU 

Table  25.  FFTPAR  SU  output  data  element  requirements. 


Name 

Description 

Units 

A z  PE 

Bin  width  in  z  space 

meters 

lerr 

Error  code 

N/A 

lnjft 

Power  of  2  transform  size,  i.e.  ngf= 2  hifft 

N/A 

njft 

Transform  size 

N/A 

Zlim 

Maximum  height  region  where  PE  solution  is  valid 

meters 

Zmax 

Total  height  of  the  FFT/PE  calculation  domain 

meters 

5.1.10  Fill  Height  Arrays  (FILLHT)  SU 

The  FILLHT  SU  calculates  the  effective  earth  radius  for  an  initial  launch  angle  of 
5°  and  to  fill  an  array  with  height  values  at  each  output  range  of  the  limiting  sub-model, 
depending  on  which  mode  is  used.  If  running  in  a  full  hybrid  mode,  the  array  contains 
height  values  at  each  output  range,  separating  the  PE  from  the  RO  region.  If  running  in 
partial  hybrid  or  PE-only  modes,  the  array  contains  those  height  values  at  each  output 
range  at  which  the  initial  launch  angle  has  been  traced  to  the  ground  or  surface.  These 
height  values  represent  the  separating  region  where,  above  that  height,  valid  loss  is 
computed,  and  below  that  height,  no  loss  is  computed  so  that  only  loss  values  that  fall 
within  a  valid  calculation  region  are  output. 
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For  the  case  when  hybrid  =  1  (full  hybrid  mode),  all  height  values  at  each  output 
range  separating  the  FE  region  from  the  RO  region  are  determined  and  stored  in  array 
htfe.  For  ranges  greater  than  2.5  km,  the  ray  defined  by  a  5°  elevation  angle  is  traced  up 
to  the  maximum  height  htn,n.  The  ray  is  “traced”  by  simple  geometry  at  every  output 
range  and  the  height  array  htfe  is  determined  as  follows.  The  temporary  variable  yar  is 
found  from 


yar  yfref  QTltref, 


where  the  parameter  yfref  is  the  ground  elevation  height  at  the  source,  and  antref  is  the 
transmitting  antenna  height  relative  to  the  height  hminter.  The  values  of  htfe,  are  then 
determined  by 

htfe,  =  v fref ;  for  rngoif  <rtst 

/  (  Yt  ?  /  1^  2,  .  .  •Ylyout 

ht/e,  =MIN(/E/,m ,  MAXjy fref  ,yar  +t5 rngouti  f  for  rngouti  >  rtst 


where  rtst  is  a  constant  range  of  2.5  km,  ts  is  the  tangent  of  5°,  and  rngouti  is  the  output 
range  at  every  /'th  range  step. 

For  the  airborne  hybrid  model  (ihybnd=0),  the  TRACEROUT  SU  is  referenced  to 
determine  the  heights  at  every  output  range  separating  the  upper  FE  region  from  the  PE 
region.  These  heights  are  stored  in  array  hlim.  The  heights  separating  the  lower  FE  region 
from  the  PE  region  are  stored  in  array  htfe  as  outlined  below. 

For  partial  hybrid  (PE  plus  XO)  or  airborne  modes,  the  initial  launch  angle  is 
traced  until  it  hits  the  surface,  storing  heights  traced  at  each  output  range. 

First,  several  variables  are  initialized.  The  angle  at  the  start  of  the  trace,  ao,  is  set 
to  -a launch  (determined  in  the  GETTHMAX  SU);  the  initial  range,  i%  is  set  equal  to  zero; 
and  the  height  at  the  start  of  the  ray  trace  step,  ho,  is  set  equal  to  antref.  The  index,  /, 
indicating  the  location  of  the  source  height  in  array  htdum,  is  set  equal  to  the  index  istarti- 
The  terrain  elevation  at  the  current  range,  tyr,  is  initialized  to  0,  and  the  index  j  is  set 
equal  to  one. 

The  following  steps  (1  through  2)  are  perfonned  until  the  ray  has  reached  the 
surface  or  the  ray  has  been  traced  to  rmax,  whichever  comes  first. 

1 .  The  output  range  to  trace  to  rQ  is  initialized  to  rngoutj,  and  htfej  is  initialized  to  0. 
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2.  The  TRACESTEP  SU  is  accessed  to  trace  the  ray  to  the  next  range  step,  which  is 
incremented  by  ArPE.  The  height  at  that  range  is  then  stored  in  array  htfe.  The  index  j 
is  incremented  by  one,  and  if  the  ray  has  not  reached  the  surface  or  rmax,  then  steps  1 
and  2  are  repeated. 

Once  the  ray  trace  is  completed,  the  index  j  is  decremented  by  one  and  htfej  is  set 
equal  to  /?/«,<, /for  all  remaining  output  range  steps  j  through  nrout. 

Table  26  and  Table  27  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FILLHT  SU  input  and  output  data  element. 


Table  26.  FILLHT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

&  launch 

Launch  angle  used  which,  when  traced,  separates  the  PE 
and  XO  regions  from  the  RO  region 

radians 

GETTHMAX  SU 

ClJitref 

Transmitting  antenna  height  relative  to  the  reference 
height  hminter 

meters 

TERINIT  SU 

ArPE 

PE  range  step 

meters 

PEINIT  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

grdum 

M-unit  gradient  array 

(M-unit/ 

meter) 

REFINIT  SU 

hmref 

Height  relative  to  hmmter 

meters 

TERINIT  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINIT  SU 

h  tnm 

User-supplied  maximum  height  relative  to  hminter,  i.e., 

htlim  h max~  hminter 

meters 

TERINIT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  (FEDR  +  PE)  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

^startl 

Refractivity  level  index  within  htdum  at  antref 

N/A 

REFINIT  SU 

Ivlep 

Number  of  refractivity  levels  in  profile  htdum,  refdum 

N/A 

REFINIT  SU 

Mrout 

Integer  number  of  the  output  range  points  desired 

N/A 

Calling  CSCI 

rngout 

Array  containing  all  output  ranges 

meters 

APMINIT  CSC 

r,st 

Range  set  at  2.5  km  to  begin  calculation  of  RO  values 

meters 

APMMOD 

075 

75%  of  maximum  propagation  angle  in  PE  calculations 

radians 

APMINIT  CSC 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

ypef 

Ground  elevation  height  at  the  source 

meters 

APMINIT  CSC 
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Table  27.  FILLHT  SU  output  data  element  requirements. 


Name 

Description 

Units 

hlirn 

Array  containing  the  height  at  each  output  range  separating  the  RO  region  from  the 

meters 

PE  (at  close  ranges)  and  XO  (at  far  ranges)  regions 

htfe 

Array  of  height  values  at  each  output  range  separating  the  PE  region  from  the  RO 

meters 

region 

5.1.11  Gaseous  Absorption  (GASABS)  SU 

The  GASABS  SU  computes  the  specific  attenuation  based  on  air  temperature  and 
absolute  humidity.  This  SU  is  based  on  CCIR  (International  Telecommunication  Union, 
International  Radio  Consultative  Committee,  now  the  ITU-R)  Recommendation  676-1, 
“Attenuation  by  Atmospheric  Gases  in  the  Frequency  Range  1-350  GHz.” 


The  oxygen  absorption  for  15°C  air  temperature  is  computed  from 


r, 


where  fMHz  is  the  frequency  in  MHz  and  the  temporary  variables  //  and  t2  are  given  by 


6.09 


ImnA  +  o.227 
1000J 


+1.50 


A  correction  is  made  for  the  oxygen  absorption  for  the  actual  air  temperature, 
which  is  given  by 

K  =  (1.0  +  0.01  {c  -  15.0})  r„, 
where  tab-  is  the  surface  air  temperature  in  degrees  Centigrade. 


c=- 


4.81 


f MHz 

1000. 


-57.0 
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The  water  vapor  absorption  is  computed  from 


rw  = 


(0.05  +  0.0021  abshum  +  tx  +  t2  +  0  abs 

10000.0 


where  the  temporary  variables  ti,  t2,  and  t$  are  given  respectively  by 


h 


3.6 


(fm__222\  +  8.5 

U000. 


^2 


10.6 


f  Im 


,  -  183.31  +  9.0 

U000. 


and 


h 


8.9 


f  f M 


i  -  325.4  |  +  26.3 

uooo. 


The  total  specific  absorption  for  sea-level  air  in  dB/km  multiplied  by  a  conversion 
factor  to  convert  to  dB/m  is  given  by 

sasatt  =(y0  +yw ) 1  o  3  • 

Table  28  and  Table  29  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GAS  ABS  SU  input  and  output  data  element. 


Table  28.  GASABS  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ClbShum 

Absolute  humidity  near  the  surface 

g/meter3 

Calling  CSCI 

f MHz 

Frequency 

MHz 

Calling  CSCI 

tair 

Air  temperature  near  the  surface 

°C 

Calling  CSCI 
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Table  29.  GASABS  SU  output  data  requirements. 


Name 

Description 

Units 

gciSat, 

Gaseous  absorption 

dB/m 

5.1.12  Get  Effective  Earth  Radius  Factor  (GETK)  SU 

The  GET  K  SU  computes  the  effective  earth  radius  factor  and  the  effective  earth 
radius.  The  computation  is  made  for  a  launch  angle  of  5°  if  the  SU  is  called  from  the 
APMINIT  CSC.  If  called  from  the  TROPOINIT  SU,  then  the  computation  is  made  for  a 
launch  angle  equal  to  the  critical  angle. 

Upon  entering  the  SU,  internal  one-line  ray  trace  functions  are  defined  as 


RADAl(fl,i))=a2  +2  grdb, 
RP(a,  b)=  a  +  , 

grd 


for  general  parameters  a,  b,  and  refractivity  gradient  grci. 

The  starting  launch  angle  astart  for  tracing  a  ray  to  determine  the  effective  earth 
radius  is  initialized  to  the  critical  angle  acnt. 

If  the  SU  is  called  from  the  APMINIT  CSC  (iorg  =  0),  then  asrarr  is  re-initialized  to 
5°.  If  running  the  airborne  model  then  the  beamwidth  and  antenna  elevation  angle  are 
taken  into  account  and  the  starting  angle  is  initialized  according  to 

a start  =  M I N  [m  AX  ,  nhwr  +  fil[m  ),  1  o  j , 


where 


dum  =  MIN(l  0% \fior  l) . 


If  a  terrain  profile  has  been  specified  (f,er  =  ‘.true.’),  then  astart  is  set  equal  to 

«^=MIN(L5«start»10°)- 


If  using  the  airborne  or  full  hybrid  modes,  or  if  calling  from  the  TROPOINIT  SU, 
then  perform  steps  1  through  4  to  compute  the  effective  earth  radius  from  the  antenna 
height  up  to  height  htn,n. 
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1.  The  propagation  angle,  range,  and  height  at  the  start  of  the  ray  trace  step  are 
initialized  to  astart,  0.,  and  antref,  respectively.  The  current  refractivity  level  i  is  also 
initialized  to  istani- 

2.  Steps  2a  through  2c  are  perfonned  for  an  upward  ray  until  it  has  reached  the  last 
height  in  the  refractivity  level  or  htnm,  whichever  comes  first. 

a.  The  gradient  grci  is  set  equal  to  grdunii.  The  propagation  angle  a\  and  range  r\  at 
the  end  of  the  trace  step  are  computed  as 


ax  =^j  RADA  l(a0  ,htdumj+1  —h0 ), 
r1=RP(r0,a1-o0). 


b.  ao,  ro,  and  ho  are  now  set  equal  to  the  values  of  a\,  r\  and  htdumi+i,  respectively.  If 
h0  is  greater  than  htnm,  then  the  integer  flag  ifjag  is  set  equal  to  1,  and  the 
propagation  angle  a\  at  htu,n  is  computed  as 

ax  =yj RADA  l(o0,  htUm  -  htdumj  ). 

A  temporary  maximum  propagation  angle  075a  is  then  set  equal  to  a\. 

c.  The  current  refractivity  level  i  is  incremented  by  1.  If  one  of  the  conditions  in  step 
2  has  been  met,  then  the  SU  proceeds  to  step  3;  otherwise,  steps  2a  through  2c  are 
repeated. 

3.  If  ho  is  less  than  htnm  and  ijiag  is  equal  to  0,  then  propagation  angle  a\  at  htum  is  re¬ 
computed  as 


ai=^RADAl(a0,  htlim  -  h0) 

and  the  variable  075a  is  then  set  equal  to  a\. 

4.  The  propagation  angle  and  range  a\  and  r\  are  now  re-computed  from 

a,  =a/RADA  l(a0  ,htdumMep  -h0 ) , 
Ai=RP(r0,a1-a0), 
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and  the  effective  earth  radius  aek,  the  effective  earth  radius  factor  e/c,  and  twice  the 
effective  earth  radius,  twoka  are  given  by 


twoka  =2aek, 
ek  =6.37  x  1CT6  aek. 

If  using  the  airborne  hybrid  model  and  the  calling  SU  is  the  APMINIT  CSC,  then 
twice  the  effective  earth  radius  factor  is  computed  for  a  downward  ray  where  the  initial 
launch  angle  is  -astart.  Steps  1  through  2a  are  repeated  with  a  /  negative,  i  decremented  by 
1,  and  htdunii+i  replaced  with  htdimij.  Finally,  the  variable  twokcidown  is  computed  from 

2  Y 

twoka  dmm  = - 1 — , 

a,  +  a 


and  075  is  determined  from 


015  =  MAX(<975fl ,  a  start ) . 

Table  30  and  Table  31  provide  identification,  description,  units  of  measure,  and 
show  the  computational  source  for  each  input  and  output  data  element,  respectively,  of 
the  GET  K  SU. 


Table  30.  GET_K  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

&crit 

Critical  angle  (angle  above  which  no  rays  are  trapped) 

radians 

REFINIT  SU 

&  launch 

Launch  angle  used  which,  when  traced,  separates  the  PE 
and  XO  regions  from  the  RO  region 

radians 

GETTHMAX  SU 

antref 

Transmitting  antenna  height  relative  to  the  reference 
height  hminter 

meters 

TERINIT  SU 

fJ-bxvr 

Antenna  vertical  beam  width 

radians 

APMINIT  CSC 

fJ-or 

Antenna  pattern  elevation  angle 

radians 

APMINIT  CSC 

fter 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

grdum 

M-unit  gradient  array 

(M-unit/ 

meter) 

REFINIT  SU 

hmref 

Height  relative  to  hminter 

meters 

TERINIT  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINIT  SU 

h  tijm 

User-supplied  maximum  height  relative  to  hminter,  i.e., 

htlim  hmax~  hminter 

meters 

TERINIT  SU 
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Table  30.  GET_K  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  (FEDR  +  PE)  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

lorg 

Integer  flag  indicating  origin  of  calling  SU 

0  =  called  from  APMINIT  CSC 

1  =  called  from  TROPOINIT  SU 

N/A 

APMINIT  CSC 

TROPOINIT  SU 

l staril 

Refractivity  level  index  within  htdum  at  antref 

N/A 

REFINIT  SU 

Ivlep 

Number  of  refractivity  levels  in  profile  htdum,  refdum 

N/A 

REFINIT  SU 

y/ref 

Ground  elevation  height  at  the  source 

meters 

APMINIT  CSC 

Table  31 .  GET_K  SU  output  data  element  requirements. 


Name 

Description 

Units 

fl-ek 

Effective  earth  radius 

meters 

ek 

Effective  earth  radius  factor 

N/A 

075 

75%  of  maximum  propagation  angle  in  PE  calculations 

radians 

twoka 

Twice  the  effective  earth  radius 

meters 

tWokddown 

Twice  the  effective  earth  radius  for  downward  path 

meters 

5.1.13  Get  Alpha  Impedance  (GETALN)  SU 

The  GETALN  SU  computes  the  surface  impedance  tenn  in  the  Leontovich 
boundary  condition  and  the  complex  index  of  refraction  for  finite  conductivity.  The 
implementation  of  these  impedance  formulas  follow  Kuttler  and  Dockery4 s  method 
(1991). 


Upon  entering  the  SU,  the  smooth  surface  impedance  term  a  is  computed  from 

2 

the  complex  dielectric  constant  nc  and  free  space  wavenumber  k0 ,  for  both  vertical  and 
horizontal  polarization,  by 


a,=ik0 
av  =  ik0 


where  /  is  the  imaginary  number  V-T  . 
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If  a  frequency  less  than  50  MHz  has  been  specified  ( HFfjag  =  ‘.true.’),  then  the 
SURFIMP  SU  is  referenced  to  compute  the  effective  surface  impedance,  over  sea¬ 
water.  The  surface  impedance  term  for  vertical  polarization  is  then  computed  as 

av=ik0C 

over  seawater,  and  for  those  portions  of  the  path  over  land,  it  is  computed  as 
a'h,v  ~ik0  SINy/- 1  j^’v 

1  1  h,v 

ah,v  =  c°S(fi\ah,v  +^[/4OS(^)-COS^] 


where 


(3  =  TAN-1  (5/p) 


and  sip  is  the  slope  of  the  terrain  segment  at  the  current  range.  For  a  non-zero  grazing 
angle  the  rough  surface  reflection  coefficient,  r,  is  detennined  from  referencing  the 
GETREFCOEF  SU. 

For  frequencies  above  50  MHz,  and  if  rough  surface  calculations  are  required  ( ruf 
=  ‘.true.’),  then  if  a  non-zero  grazing  angle  ^exists  for  the  current  range  step,  the  surface 
impedance  is  computed  as 


«*,v=^0slN^!  1}’v  » 

1  1  h,v 

where  the  subscripts  h,v  indicate  horizontal  and  vertical  polarization  quantities, 
respectively. 

If  using  the  central  difference  algorithm  (iaig  =  1),  follow  steps  1  through  2  to 
compute  constants  and  variables  for  subsequent  use  in  the  MIXEDFT  SU. 

1 .  The  determination  of  the  complex  root,  Rj,  of  the  quadratic  equation  for  the  mixed 
transfonn  method  is  based  on  Kuttler’s  fonnulation: 


Rt—  Jl.0+(ahAzPE) 


ahAzPE  for  horizontal  polarization, 


Rt  yjl  .0 +(o.vAz PE  ) 


avAzPE  for  vertical  polarization 
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2.  Next,  the  array  rn  is  determined  according  to 


mi  =  R,T.  I  =  1,2,... rifft. 

Several  parameters  used  in  the  central  difference  algorithm  are  now  computed: 


If  using  the  backward  difference  algorithm  (iaig  =  2),  RT  is  computed  as 


the  array  rn  is  computed  as  in  step  2  above,  and  the  parameter  cmftx  is  computed  using 
the  same  equation  for  C/x  in  step  2  above. 

Table  32  and  Table  33  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GETALN  SU  input  and  output  data  element. 


Table  32.  GETALN  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

£ 

<l 

PE  range  step 

meters 

PE1NIT  SU 

^ PE 

Bin  width  in  z  space 

meters 

FFTPAR  SU 

J MH : 

Frequency 

MHz 

APMMOD 

fter 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

N/A 

APMINIT  CSC 

‘.true.’  =  terrain  profile  specified 

HFflag 

‘.false.’  =  terrain  profile  not  specified 

HF  computation  flag  indicating  the  frequency  specified 
is  less  than  50  MHz 

N/A 

APMINIT  CSC 
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Table  32.  GETALN  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being 
used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 

h 

Counter  indicating  current  ground  type  being  modeled 

N/A 

APMINIT  CSC 
PESTEP  SU 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

k0 

Free-space  wavenumber 

meters"1 

APMINIT  CSC 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 

DIEINIT  SU 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

V 

Grazing  angle 

radians 

Calling  SU 

r 

Current  calculation  range 

meters 

Calling  SU 

rngwind 

Ranges  of  wind  speeds  entered:  rngwind \  =  range  of 
i,h  wind  speed 

meters 

Calling  CSCI 

ruf 

Logical  flag  indicating  if  rough  sea  surface 
calculations  are  required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface 
calculations 

N/A 

APMINIT  CSC 

sip 

Slope  of  the  terrain  segment  at  the  current  range. 

N/A 

TERINIT  SU 

wind 

Array  of  wind  speeds 

meters/ 

sec 

Calling  CSCI 

Table  33.  GETALN  SU  output  data  element  requirements. 


Name 

Description 

Units 

CXh,  y 

Surface  impedance  term  for  horizontal  and  vertical  polarization 

N/A 

C/x 

Constant  used  to  propagate  Cki  by  one  range  step  in  central  difference  algorithm 

N/A 

C2x 

Constant  used  to  propagate  Cu  by  one  range  step  in  central  difference  algorithm 

N/A 

cmftx 

Constant  used  to  propagate  cmft  by  one  range  step  in  backward  difference 
algorithm 

N/A 

Rk 

Coefficient  used  in  Cki  and  Ck2  calculations. 

N/A 

rn 

Array  of  RT  to  the  ith  power  (e.g.,  r«,  =  Rp) 

N/A 

RT 

Complex  root  of  quadratic  equation  for  mixed  transform  method  based  on 

Kuttler’s  formulation 

N/A 
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5.1 .14  Get  Angles  (GETANGLES)  SU 

The  GETANGLES  SU  computes  grazing  angles  at  each  PE  range  step  via  ray 
trace  and  spectral  estimation  for  subsequent  use  in  rough  sea  surface  calculations.  This 
SU  is  referenced  only  if  lgraze  is  ‘.true.’.  This  flag  is  set  to  ‘.true.’  for  any  number  of 
conditions  that  require  grazing  angle  calculations,  such  as  rough  surface,  HF  frequency 
has  been  specified,  clutter  calculations  are  desired,  and  if  Icing  is  specified  as  ‘.true.’. 

Upon  entering  the  SU,  the  RGTRACE  SU  is  referenced  to  determine  the  grazing 
angles  i//rav  from  ray  trace. 

If  a  terrain  profile  has  been  specified  (f,er  =  ‘.true.’)  and  a  surface-based  duct  has 
been  specified  {l duct  =  ‘.true.’)  then  the  grazing  angles  y/PE  are  computed  from  spectral 
estimation  of  the  near-surface  PE  field  by  running  the  PE  algorithm  out  to  the  maximum 
range  rmax,  assuming  horizontal  polarization  and  smooth  surface  conditions  (i.e.,  no  wind 
speed). 


First,  the  array  y/PE  is  allocated  for  size  of  iPE — equal  to  the  number  of  PE  range 
steps  required  to  propagate  the  field  out  to  rmax.  The  array  is  initialized  to  zero,  with  the 
first  element  initialized  to  n/2  radians.  If  the  propagation  angles  and  factors  are  to  be 
computed  ( lang  =  ‘.true.’)  then  the  appropriate  arrays  are  allocated  and  initialized.  The 
TRACE  ROUT  SU  is  then  referenced  to  trace  one  ray  at  the  maximum  calculation  angle. 
The  current  PE  range  r  and  PE  integer  step  iPEstp  are  then  set  equal  to  zero,  with  the 
terrain  height  yiast  at  the  previous  range  step  set  equal  to  tv  ho  if  a  terrain  profile  has  been 
specified,  or  0  otherwise.  An  iterative  DO  WHILE  loop  is  then  begun  to  advance  the  PE 
solution  such  that  for  the  current  PE  range,  a  PE  solution  is  calculated  from  the  solution 
at  the  previous  PE  range.  This  iterative  procedure  is  repeated  in  the  DO  WHILE  loop 
until  r  is  greater  than  rmax.  The  following  steps  (1  through  5)  are  performed  for  each  PE 
range  step  within  the  DO  WHILE  loop. 

1 .  The  current  PE  calculation  range  r  is  incremented  by  one  PE  range  step,  A rPE  and  the 
PE  range  step  counter  iPEstp  is  incremented  by  1.  The  range  at  which  interpolation  for 
range-dependent  refractivity  profiles  is  performed,  rmui,  is  also  incremented  by  one- 
half  the  PE  range  step. 

2.  If  performing  a  terrain  case  (fter  =  ‘.true.’),  the  ground  heights,  yCw  and  y  at  range 
r  and  rmid,  respectively,  are  detennined  according  to 

ycur  =  tyhipEsp, 

y  curm  =  X(0'^-l+J'aH-) 

If  ycur  is  less  than  yCUrm,  the  DOSHIFT  SU  is  referenced  to  adjust  the  PE  field  relative 
to  the  terrain  height. 
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The  PE  field  array  U  is  now  propagated  in  free  space  one  range  step  by  referencing  the 
FRSTP  SU. 


If  the  APM  CSCI  is  used  in  a  range-dependent  mode  (i.e.,  the  number  of  profiles  nprof  is 
greater  than  1),  or  a  terrain  profile  is  specified,  the  REFINTER  SU  is  referenced  to 
compute  a  new  modified  refractive  index  profile,  profint,  adjusted  by  the  local  ground 
height  Vcurm  at  range  rmij.  A  new  environmental  phase  array,  envpr,  based  on  this  new 
refractivity  profile  is  then  computed  from 

envpr  =  e  ;  j=l,2,...nfft 

envpr .  =  Jilt j  ,penvprj ;  j=  n34,  n34+ 1,  n34+ 2,  ...  nfft 

3.  The  complex  field  U  is  now  multiplied  by  the  environmental  phase  array  for  all  bins 
from  0  through  n^- 1. 

4.  Next,  if  a  terrain  profile  has  been  specified  and  the  terrain  slop  is  positive  (ycur  > 
Vcurm),  the  DOSHIFT  SU  is  referenced  to  adjust  the  PE  field  relative  to  the  terrain 
height. 

5.  The  SPECEST  SU  is  then  referenced  to  determine  the  grazing  angle  30Ut  and  this 
angle  is  stored  in  array  y/PE.  If  no  terrain  has  been  specified  and  the  range  is  greater 
than  the  horizon  range  rhor,  then  the  grazing  angle  stored  is  the  smaller  of  the  tangent 
angle  acut  or  3out. 

6.  This  step  is  performed  only  if  lang  is  ‘.true.’.  The  propagation  angle  at  select  height 
points,  as  long  as  they  are  less  than  the  height  defined  by  the  ray  traced  at  the 
maximum  calculation  angle,  are  computed  by  referencing  the  SPECEST  SU.  These 
are  then  stored  in  array  0p  . 

Finally,  igPE,  the  number  of  grazing  angles  computed,  is  initialized  to  iPE  and  the 
SU  is  exited. 
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Table  34  and  Table  35  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GETANGLES  SU  input  and  output  data  element. 


Table  34.  GETANGLES  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

&cut 

Tangent  angle  from  antenna  height  to  radio  horizon 

radians 

PEINIT  SU 

antref 

Transmitting  antenna  height  relative  to  the  reference  height 
h 

,lminter 

meters 

TERINIT  SU 

Ar pe 

PE  range  step 

meters 

PEINIT  SU 

ArPE2 

Vi  PE  range  step 

meters 

PEINIT  SU 

flit 

Cosine-tapered  (Tukey)  filter  array 

N/A 

PEINIT  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

ll  t  lim 

User-supplied  maximum  height  relative  to  hminter,  i.e.,  htum 
=h  -  h 

,lmax  '•'minter 

meters 

TERINIT  SU 

h 

trap 

Height  of  the  highest  trapping  layer  from  all  refractivity 
profiles 

meters 

REFINIT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  pure  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

lang 

Propagation  angle  and  factor  output  flag 

‘.true.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and  factors 

N/A 

Calling  CSCI 

Iduct 

Logical  flag  indicating  if  surface-based  duct  profile  has  been 
specified 

‘.true’.  =  surface-based  duct  exists 
‘.false.’  =no  surface -based  duct  exists 

N/A 

REFINIT  SU 

levap 

Logical  flag  indicating  if  evaporation  duct  profile  has  been 
specified 

‘.true’.  =  evaporation  duct  exists 
‘.false.’  =  no  evaporation  duct  exists 

N/A 

REFINIT  SU 

tlffi 

Transform  size 

N/A 

FFTPAR  SU 

n34 

%  Tlffi 

N/A 

PEINIT  SU 

nf4 

Vi  Tlffi 

N/A 

PEINIT  SU 

M prof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 

fthor 

Radio  horizon  range 

meters 

PEINIT  SU 

ft max 

Maximum  specified  range 

meters 

Calling  CSCI 

,9 

w mxg 

Maximum  PE  calculation  angle  for  spectral  estimation  of 
grazing  angles 

radians 

APMINIT  CSC 
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Table  34.  GETANGLES  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

tyh 

Adjusted  height  points  of  sampled  terrain  profile  at  every  PE 
range  step 

meters 

TERINIT  SU 

Table  35.  GETANGLES  SU  output  data  element  requirements. 


Name 

Description 

Units 

Az 

t-^spec 

Height  increment  at  which  the  propagation  angles  are  computed  from  spectral 
estimation 

meters 

Ispec 

Logical  flag  indicating  if  grazing  angles  need  to  be  computed  via  spectral 
estimation. 

‘.true.’  =  compute  grazing  angles  by  spectral  estimation 
‘.false.’  =  do  not  compute  grazing  angles  by  spectral  estimation 

N/A 

Wang 

Number  of  points  in  the  vertical  at  which  to  spectrally  estimate  propagation 
angles. 

N/A 

tyPE 

Array  containing  grazing  angles  computed  from  spectral  estimation  of  PE  field 

radians 

y^ray 

Two-dimensional  array  containing  grazing  angles  and  corresponding  ranges 
computed  from  ray  trace 

radians, 

meters 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and  DEALLOCATE 
statements 

N/A 

igPE 

Number  of  grazing  angles  computed  from  spectral  estimation 

N/A 

Igrz 

Number  of  grazing  angles  computed  from  ray  trace 

N/A 

0 

P 

Two-dimensional  array  containing  the  propagation  angle  estimated  from  PE  at 
nang  height  points  and  at  every  PE  calculation  range  step  during  the  initialization 
routine.  Format  is  0p  ( i,j )  =  propagation  angle  at  the  ith  height  point  (z=l  to 

Hang)  and  j'h  PE  range  step  (j  =  0  to  igp£ ). 

radians 

5.1.15  Get  Maximum  Angle  (GETTHMAX)  SU 

The  GETTMAX  SU  performs  an  iterative  ray  trace  to  determine  the  minimum 
angle  required  (based  on  the  reflected  ray)  in  obtaining  a  PE  solution.  The  determination 
of  this  angle  depends  on  the  particular  mode  of  execution.  For  full  and  partial  hybrid 
modes,  a  ray  is  traced  up  to  a  height  that  exceeds  at  least  20%  above  the  maximum  terrain 
peak  along  the  path  or  the  highest  trapping  layer  specified  in  the  environment  profiles, 
whichever  is  greater.  Heights  and  angles  of  this  ray  are  stored  at  each  output  range.  The 
maximum  PE  propagation  angle,  0max,  is  then  detennined  from  the  local  maximum  angle 
of  the  traced  ray.  For  the  full  hybrid  mode,  the  minimum  PE  propagation  angle  is 
required  to  meet  the  following  criteria:  (1)  the  top  of  the  PE  region  must  contain  all 
trapping  layers  for  all  refractivity  profiles,  (2)  the  top  of  the  PE  region  must  be  at  least 
20%  higher  than  the  highest  peak  along  the  terrain  profile,  and  (3)  the  minimum  PE 
propagation  angle  must  be  at  least  as  large  as  the  grazing  angle  of  the  limiting  ray  y/um. 
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First,  four  in-line  ray  trace  functions  are  defined  for  general  parameters  a,  b,  c, 

and  grd- 

RADAl(n,6)=a2  +2 grdb , 

RP(a,Z>)=a-l — — , 

grd 

AP (a,b)=a+bgrd  , 

b2  —c 2 

HP(fl,6,c)=fiH - . 

2  grd 

The  first  parameter  to  be  determined  is  the  minimum  PE  angle  limit  amjim.  The 
parameter  to  be  determined  later,  0max,  must  be  at  least  this  value.  The  initial  estimate  of 
amiim  is  given  by 

^  ~fMHz  ~  f MHz  ~fMHz 

amUm  =%0  .37541  +  4.331<?  24fU  +  1 .42e  2867  +  .4091e  2495 


If  the  DMFT  algorithm  is  not  required  based  on  the  specified  inputs,  the  propagation  path 
is  entirely  over  water  and  no  rough  surface  calculations  are  required,  then  amiim  is 
decreased  by  Vi. 

For  a  specific  height-finder  antenna  pattern  ( ipat  =  6),  the  PE  angle  limit  is  re¬ 
computed  as 

®  mlim  /l80  <4.36985  - 1  .02784/gh.  +  0.0786 fag )  for 

f GHz  ^ 

a.,,„  =  "Am  (2.3-0. 1  faHl  )  for  fmz  >  6.0  ’ 

where  f  'ghz  is  the  frequency  in  gigahertz.  If  rough  surface  calculations  are  to  be  performed 
and  if  a  surface-based  duct  has  been  specified,  then  amum  is  doubled. 

If  the  backward  difference  DMFT  algorithm  will  be  used,  then  amiim  is  adjusted  to 
accommodate  low  antenna  heights  according  to 

f  (a, 

amUm=  MAX  amlim , SIN-1  - — — 

^  l2  antht 

A  multiplicative  height  factor  hmt  is  determined  to  ensure  clearance  of  the  ray  path 
for  low  antenna  heights  over  large  terrain  elevations: 
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hmt  ~  MIN 


^  2,  anth< 


.VIAXf/v,  ,l) 


If  hmt  is  less  than  0.1,  then  it  is  set  equal  to  0.  It  is  then  increased  by  1 . 

Several  constants  needed  in  subsequent  steps  in  this  SU  are  determined.  An  initial 
estimate  of  the  launch  angle  aiaUnch,  is  initialized  to  aum,  the  elevation  angle  of  the  RO 
limiting  ray.  If  using  the  full  hybrid  mode,  then  aiaunch  is  set  equal  to  the  negative  of 
a  launch-  The  maximum  height  to  trace  to,  zumt,  is  set  equal  to  htum- 10'5,  and  the  range  step, 
A rtemp,  for  subsequent  ray  tracing  is  given  by  rmaxl 200.  The  terrain  elevation  height  at  the 
source,  ynt,  is  initialized  to  ty\,  provided  APM  is  running  in  a  full  hybrid  mode  and  ty\  is 
greater  than  zero;  otherwise,  ynt  is  initialized  to  0. 

An  iterative  ray  trace  to  determine  the  launch  angle  aiaUnch  and  subsequently  0max 
is  then  begun.  Steps  1  through  3  are  performed  until  a  ray  has  been  safely  traced  from 
height  ant ref  to  znmt. 


1 .  At  the  start  of  the  ray  trace,  the  current  local  angle  (ao),  range  (r0),  height  (ho),  and 
refractive  gradient  index  (j)  are  initialized  to  aiaunch,  0,  antref,  and  istart\,  respectively. 
The  counter  index,  kt,  for  the  terrain  profile  arrays  tx  and  ty  is  initialized  to  one.  The 
variable  r0,  the  current  output  range  to  trace  to,  is  set  equal  to  zero.  Steps  l.a  through 
1  .d  are  then  performed  for  each  ray  trace  step  from  1  to  i  rtemp- 

a.  First,  rQ  is  incremented  by  A rtemp.  Now  steps  i  through  vii  are  performed  until  r0 
reaches  r0. 

i.  The  range  at  the  end  of  the  ray  trace  step,  r\,  is  set  equal  to  rQ,  and  the  current 
refractive  gradient  g,-d  is  set  equal  to  grdunij 

ii.  The  angle  at  the  end  of  the  trace,  a\,  is  then  given  by 

ai  =  ApK>h  ~r0)- 

iii.  If  a i  is  of  the  opposite  sign  of  a0,  then  a\  is  set  to  zero  and  r\  is  given  by 

f  =RP(f)  A, -«o)- 

iv.  The  height  at  the  end  of  the  ray  trace  h  \  is  given  by 
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v.  If  a\  is  positive  and  h\  has  reached  or  surpassed  the  next  height  level,  then  a\, 
r\,j,  and  h\  are  found  as  follows.  First,  h\  is  set  equal  to  htdumj+i,  and  a\  and 
r\  are  given  by 

a\ 

r=R?{r(],a-a{) 


The  index  j  is  incremented  by  one,  and  the  height,  hi,  at  the  end  of  the  ray 
trace  step  is  given  by  the  smaller  of  htn,n  or  htdumj. 

vi.  However,  if  either  of  the  conditions  for  a\  and  h\  in  step  v  are  not  met,  and  a\ 
is  less  than  or  equal  to  0,  then  h\  is  set  equal  to  ynt  if  the  calculated  value  in 
step  iv  is  less  than  ynt.  If  the  calculated  value  of  h  \  in  step  iv  is  less  than 
htdumj,  then  h\  is  set  equal  to  htdumj,  and  j  is  set  equal  to  the  maximum  of  0 
or  j- 1  .  The  variables  ci\  and  r\  are  then  detennined  from 


a,  =- RADA  i\a(),h]  -  h0 
r,  =RP(r0,a,  -a0) 


vii.  If  the  ray  has  hit  the  surface  and  is  reflected,  which  would  be  the  condition  for 
which  h\  is  set  equal  to  ynt  in  step  vi,  then  a\  is  set  equal  to  minus  a\,  )///„„  is  set 
equal  to  a\,  the  range,  rpest  (at  which  loss  values  from  the  PE  model  will  start 
being  calculated)  is  set  equal  to  r\,  and  the  height  hstart  is  set  equal  to  ynt.  The 
variable  hstart  is  used  for  subsequent  initialization  of  ray  tracing  to  fill  in  array 
hii„.  In  preparation  for  the  next  ray  trace  step;  ho  is  set  equal  to  hi,  r0  is  set 
equal  to  r\,  and  ao  is  set  equal  to  a  i.  If  the  range  r\  is  greater  than  rflat,  then  the 
current  iteration  is  exited  and  the  SU  proceeds  to  step  b;  otherwise,  steps  i 
through  vii  are  repeated  until  r0  reaches  rQ. 

b.  If  running  a  terrain  case  {fler  =  ‘.true.’),  at  the  end  of  the  ray  trace  for  the  current 
step,  a  check  is  made  to  see  that  the  current  height  of  the  ray  is  at  least  20% 
higher  than  the  current  terrain  height.  The  counter  kt  is  determined  such  that  ro  > 
tx/a-i  and  kt  <  itpa.  If  using  the  partial  hybrid  mode  and  range  r0  is  less  than  5  km, 
then  the  clearance  height  of  the  terrain,  yn,  at  the  current  range  for  the  traced  ray, 
is  given  by 

yn  =  Kt  [tykt  +  s,Pt  (r<>  -  txk, )]  • 


If  the  previous  conditions  are  not  met,  then  hmt  in  the  above  equation  is  replaced 
with  the  constant  1.2. 
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c.  The  ending  angle,  range,  and  height  for  each  ray  trace  step  is  now  stored  in  arrays 
ray  a,  rtemp,  and  htemp,  respectively. 

d.  Now,  if  running  a  full  hybrid  case  {hybrid  =  1),  a  test  is  made  to  determine  if  both 
ho  is  less  than  yn  and  if  r o  is  greater  than  rjjat.  If  these  conditions  are  true,  then  the 
flag  iquit  is  set  equal  to  1 .  If  the  case  is  not  a  full  hybrid  case  and  if  ho  is  less  than 
yn,  then  iquit  is  set  equal  to  1.  Finally,  if  ho  is  greater  than  or  equal  to  znmt;  or  iquit 
equals  1,  then  the  current  iteration  is  exited  and  the  SU  proceeds  to  step  2; 
otherwise,  steps  1  .a  through  1  .d  are  repeated. 

2.  If  the  iteration  defined  by  steps  l.a  through  l.d  has  been  prematurely  terminated 
(iquit=\),  then  the  initial  elevation  angle  aiaUnch  is  decreased  by  10"  radians  for  the  full 
hybrid  case  (4v&„y=l),  and  is  increased  by  1 0‘3,  otherwise.  If  the  previous  iteration  has 
not  been  prematurely  tenninated  {iqUit=  0),  the  SU  continues  with  step  3. 

3.  If  height  zumt  is  reached,  then  an  initial  launch  angle  (i.e.,  ray)  has  been  found  with  all 
traced  heights,  ranges,  and  angles  stored.  The  integer  flag  to  continue  ray  tracing,  iray, 
is  set  to  equal  1  to  terminate  the  iterative  loop,  and  the  index  iim,ax,  indicating  the 
range  step  at  which  znmt  is  reached,  is  set  equal  to  the  range  step  index  i  (the  range 
step  index  counter  in  the  iterative  loop  defined  by  steps  1  through  3. 

The  remaining  elements  from  i/mmx  to  irtemp  in  arrays  htemp ,  rtemp ,  and  raya  are 

filled  with  the  values  ho,  rmax,  and  ao,  respectively.  Next,  the  index  ihmax  is  set  equal  to  the 

minimum  of  ihmax  or  irtemp • 


The  variable  0max  is  found  for  the  PE  region  based  on  the  local  ray  angles  just 
determined  for  the  particular  ray  traced.  First,  the  index  iap  at  which  the  local  ray  angle 
becomes  positive  (i.e.,  rayat  )  is  determined.  If  iap  equals  irtemp  this  indicates  that  no  PE 
calculations  are  required  for  the  specific  geometry,  in  which  case  the  flag  nopE  is  set 
equal  to  1 ,  075  is  set  equal  to  a„iim,  rpest  is  set  equal  to  rmax,  zUm  is  set  equal  to  ht/im,  and  the 
SU  is  exited  .  Otherwise,  several  variables  are  next  initialized.  The  local  indices,  i0k  and 
iflag,  plus  the  variables  z/,-,,,  and  amxcur,  are  each  set  equal  to  zero.  The  variable  amxcur  is  the 
maximum  local  angle  along  the  traced  ray  up  to  height  zu„  with  a  minimum  limit  of  amnm. 

The  variable  0max  is  then  found  from  an  iteration  performed  on  the  local  angle 
and  height  at  which  the  local  maximum  angle  is  reached.  The  following  steps  1  through  6 
are  performed  while  the  flag  i„k  is  0. 

1 .  The  height  in  the  PE  region  that  must  be  reached  for  the  hybrid  model  is  ztest.  The  first 
occurrence  of  htempj  that  is  greater  than  ztest  is  found  and  the  index  ist  is  then  set  to  the 
smaller  of  the  index  j  where  this  occurs  or  ihmax- 
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2.  The  angle  amxcUr  is  now  initialized  to  ray  a  \ .  The  maximum  angle  in  ray  a  is  then  found 
looking  only  at  elements  from  ray  a  2  to  raya^.  and  amxcur  is  set  equal  to  this  angle. 

3 .  amxcur  is  now  set  equal  to  the  maximum  of  amnm  and  amxcur.  The  variable  alemp  is  now 
set  to  amxcur  divided  by  0.75.  If  using  the  partial  hybrid  mode  (//,,-/, mr=2),  ztest  is  given 
by 

zn,,  =  MA X.{antref ,  htest ,  1 .2  htermax ,  1 03 ) . 

4.  A  reference  is  then  made  to  the  FFTPAR  SU  to  determine  new  values  for  ztest,  zmax, 
Az/-/.-,  Irifft,  and  nfft  using  the  inputs:  lnmin,  X,  atemp,  and  iflag. 

5.  After  the  reference  to  the  FFTPAR  SU  is  made,  if  iflag  =  0  it  is  set  equal  to  1.  In 
addition,  if  not  running  a  full  hybrid  case,  i0k  is  set  equal  to  1 .  However,  if  after  the 
reference  to  the  FFTPAR  SU  is  made,  iflag  is  equal  to  one  and  if  the  case  is  not  a 
partial  hybrid  case;  the  iterative  height  tolerance  tol  is  given  by 

Z  —  Z 
test  lim 

7 

test 

A  test  is  then  made  to  detennine  whether  this  value  of  tol  is  less  than  or  equal  to  ztoi, 
the  height  tolerance  for  Newton’s  method.  If  it  is,  then  the  index  i0u  is  set  equal  to 
one. 

6.  Now  zum  is  set  equal  to  ztest  and  if  is  0,  steps  1  through  6  are  repeated.  Otherwise, 
the  SU  proceeds  to  the  next  step. 


tol  = 


The  variable  ©75  is  now  set  equal  to  amxcur,  and  ©max  is  set  equal  to  atemp ■  The 
variable  lnjft  is  then  adjusted  such  that  for  every  5°  in  07S,  it  is  increased  by  1. 

Next,  the  TRACE  ROUT  SU  is  referenced  to  trace  the  ray  to  each  output  range 
step,  A rout,  storing  heights  in  array  hlim.  If  running  in  a  full  hybrid  mode,  the  ray  is  traced 
from  starting  angle,  range,  and  height  equal  to  y/nm,  rpest,  and  hstart,  respectively. 
Otherwise,  the  starting  angle,  range,  and  height  are  equal  to  aiaunch,  0,  and  antref, 
respectively. 

Before  exiting,  all  elements  of  hlim  corresponding  to  ranges  less  than  rpest  are  set 
equal  to  v/,e/. 
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Table  36  and  Table  37  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GETTHMAX  SU  input  and  output  data  element. 


Table  36.  GETTHMAX  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

&lim 

Elevation  angle  of  the  RO  limiting  ray 

radians 

Calling  SU 

cintht 

Transmitting  antenna  height  above  local  ground 

meters 

Calling  CSCI 

ClTlt yef 

Transmitting  antenna  height  relative  to  hmjnter 

meters 

TERINIT  SU 

J MHz 

Frequency 

MHz 

Calling  CSCI 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

grdum 

M-unit  gradient  array 

(M-unit/ 

meter) 

REFINIT  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINIT  SU 

h 

,ltermax 

Maximum  terrain  height  along  profile  path 

meters 

Calling  SU 

ktest 

Minimum  height  at  which  all  trapping  refractivity 
features  are  below 

meters 

Calling  SU 

htlim 

User  specified  maximum  height  relative  to  hmjnter 

meters 

TERINIT  SU 

ihybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  FEDR+PE  models 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being 
used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 

Irtemp 

Temporary  number  of  range  steps  (used  for  ray  tracing) 

N/A 

APMMOD 

l  start  1 

Refractivity  level  index  within  htdum  at  antref 

N/A 

REFINIT  SU 

hpa 

Number  of  terrain  points  in  used  internally  in  arrays  tx 
and  ty 

N/A 

APMINIT  CSC 

A 

Wavelength 

meters 

APMINIT  CSC 

Inmin 

Minimum  power  of  2  transform  size 

N/A 

APMINIT  CSC 

Mrout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

Vflat 

Maximum  range  at  which  the  terrain  profile  remains  flat 
from  the  source 

meters 

Calling  SU 

V max 

Maximum  output  range 

meters 

Calling  CSCI 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 
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Table  36.  GETTHMAX  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

ruf 

Logical  flag  indicating  if  rough  sea  surface  calculations 
are  required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface 
calculations 

N/A 

APMINIT  CSC 

sip 

Slope  of  each  segment  of  terrain 

N/A 

TERINIT  SU 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

TERINIT  SU 

yfref 

Ground  elevation  height  at  source 

meters 

APMINIT  CSC 

Zlim 

Height  limit  for  PE  calculation  region 

meters 

APMINIT  CSC 

Zfest 

Height  in  PE  region  that  must  be  reached  for  hybrid 
model 

meters 

Calling  SU 

Zfol 

Height  tolerance  for  Newton’s  method 

meters 

APMINIT  CSC 

Table  37.  GETTHMAX  SU  output  data  element  requirements. 


Name 

Description 

Units 

^ launch 

Launch  angle  used  which,  when  traced,  separates  PE  and  XO  regions  from  the 
RO  region 

radians 

hlim 

Array  containing  height  at  each  output  range  separating  the  RO  region  from  the 
PE  (at  close  ranges)  and  XO  (at  far  ranges)  regions 

meters 

htemp 

Heights  at  which  ray  is  traced  to  every  range  in  rtemp 

meters 

lap 

Index  indicating  when  the  local  ray  angle  becomes  positive  in  array  raya 

N/A 

lerr 

Return  error  code 

N/A 

Injft 

Power  of  2  transform  size,  i.e.  njy=  2lnff* 

N/A 

nopE 

Integer  flag  indicating  if  PE  calculations  are  needed: 

0  =  PE  calculations  needed 

1  =  no  PE  calculations  needed 

N/A 

y^lim 

Grazing  angle  of  limiting  ray 

radians 

raya 

Array  containing  all  local  angles  of  traced  ray  alaunch  at  each  irtemp  range 

radians 

^pest 

Range  at  which  loss  values  from  the  PE  model  will  start  being  calculated 

meters 

rtemp 

Range  steps  for  tracing  to  determine  maximum  PE  angle 

meters 

®max 

Maximum  propagation  angle  in  PE  calculations 

radians 

075 

75%  of  maximum  propagation  angle  in  PE  calculations 

radians 

Zmax 

Maximum  height  in  PE  calculation  region 

meters 
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5.1.16  Grazing  Angle  Interpolation  (GRAZEINT)  SU 

The  GRAZE  INT  SU  interpolates,  for  each  PE  range  step,  grazing  angles 
computed  from  both  ray  trace  and  spectral  estimation.  Those  angles  from  ray  trace  take 
precedence. 

Upon  entering  the  SU,  the  grazing  angle  array  is  allocated  for  size  ipE  and 
initialized  to  0,  with  the  first  element  initialized  to  ViK  radians.  Several  variables  are  next 
initialized.  The  variable  r  which  is  the  range  to  interpolate  to,  is  initialized  to  Arps.  The 
range  rgrz  at  which  the  spectrally  estimated  angles  were  computed  in  the  GETANGLES 
SU  is  initialized  to  Argrz. 

If  a  surface-based  duct  has  been  specified,  no  evaporation  duct  exists,  and  the 
range  rjiat  is  greater  than  the  horizon  range  r/wr,  then  a  check  is  made  for  the  possible 
existence  of  a  skip  zone  produced  by  a  surface-based  duct.  If  one  exists,  then  the 
spectrally  estimated  grazing  angles  will  be  included  in  the  interpolation  algorithm  for 
those  ranges  beyond  the  start  of  the  skip  zone.  The  check  for  a  skip  zone  is  done  by 
performing  an  iterative  loop  on  the  ranges  rmy  corresponding  to  the  grazing  angles  in  \//ray. 
For  those  ranges  beyond  rilor  the  maximum  difference  between  successive  ranges  in  rmy  is 
determined  according  to 


rskiP  =  maximum  of  [rmy^  -  rrayj );  for  j  =  k-l,k,... igrz- 1 , 

where  k  is  the  first  element  in  rmy  corresponding  to  the  first  range  beyond  r/wr.  If  rsup  is 
greater  than  5  km,  then  a  skip  zone  is  assumed  to  exist  and  the  range  per  at  which 
spectrally  estimated  grazing  will  be  included  in  the  interpolation  algorithm  is  set  equal  to 
the  minimum  of  rflat  or  rend,  where  rend  is  the  first  range  point  in  rmy  just  beyond  the  skip 
zone.  If  no  skip  zone  exists,  then  per  is  set  equal  to  rmax.  Next,  the  following  steps  1 
through  3  are  performed  for  each  PE  range  step  i,  indexed  from  1  to  /'/>/,-. 

1.  For  range  r  less  than  r/wr  steps  l.a  through  l.c  are  performed;  otherwise,  the  SU 
proceeds  to  step  2. 

a.  An  iterative  loop  is  perfonned  to  find  k,  the  element  in  rmy  corresponding  to  the 
first  range  point  beyond  rhor. 

b.  For  k  equal  to  1  the  grazing  angle  is  determined  as 


wi  = 

TAN  1 

kr) 

5  =  Kref  -  y  fref  +  antht  ~  ~Z - 

^ aekst 
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c.  For  all  other  values  of  k  the  grazing  angle  is  determined  as 


=  MAX(0,  (//), 


^  =  Vrayt_l  +¥rayt 


r  —  r 
r  —r 


2.  For  range  r  greater  than  r/)or  an  iterative  loop  is  performed  to  determine  the  number  of 
elements  icr  within  array  rray  satisfying  the  condition  rmd  <  rmv  <  rmd+ArPE,  where 
rmd  is  the  range  at  mid-PE  range  step.  The  following  steps  a  through  b  are  then 
performed. 

a.  If  icr  is  non-zero,  then  the  indices  jrl  and  jr2  are  initialized  such  that  ranges  rmy.rl 
through  rray.r2  satisfies  the  condition  in  step  2  and  jr2-jrl  equals  icr.  If  rray.r7  is 
greater  than  range  r,  then  the  grazing  angle  (/f  is  interpolated  as 


^  =  Vmyj  +¥ 


rayj+i 


r  -  r 


—  r 


where  the  index  j  lies  between  jrl  and  jr2  and  is  defined  such  that  rray.  is  the 
nearest  range  point  less  than  r  and  rray.+]  is  the  nearest  range  point  greater  than  r. 
If  rray.r2  is  less  than  r,  then  the  grazing  angle  if/  is  averaged  according  to 


¥:  = 


- 

\}cr)j=jA  ' 


b.  If  icr  is  equal  to  0  and  r  is  greater  than  per,  then  grazing  angle  (/f  is  computed 
from  interpolation  of  angles  y/pE  detennined  from  spectral  estimation.  If  no 
spectrally  estimated  angles  exist,  then  (/f  is  set  equal  to  0.  If  an  evaporation  duct 
profile  has  been  specified,  then  if  /  is  set  equal  to  y/my.  . 

'  lgrz 


3 .  Both  rmd  and  r  are  then  incremented  by  ArPE. 


Once  all  grazing  angles  W  have  been  determined,  the  arrays  \j/ray  and  y/PE  are 
deallocated  and  the  SU  is  exited. 

Table  38  and  Table  39  provides  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GRAZE  INT  SU  input  and  output  data  element. 
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Table  38.  GRAZEJNT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

@cut 

Tangent  angle  from  antenna  height  to  radio  horizon 

radians 

PE1NIT  SU 

Q-ekst 

%  times  mean  earth  radius 

meters 

APMMOD 

CMtfjt 

Transmitting  antenna  height  above  local  ground 

meters 

Calling  CSCI 

Ap grz 

PE  range  step  used  for  calculation  of  grazing  angles 

meters 

APMINIT  CSC 

AfpE 

PE  range  step 

meters 

PEINIT  SU 

Ar pe: 

!4  PE  range  step 

meters 

PEIN1T  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

hmref 

Eleight  relative  to  hminter 

meters 

TERINIT  SU 

ihybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  FEDR  +  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

igPE 

Number  of  grazing  angles  computed  from  spectral 
estimation 

N/A 

GETANGLES  SU 

Igrz 

Number  of  grazing  angles  computed  from  ray  trace 

N/A 

GETANGLES  SU 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

Iduct 

Logical  flag  indicating  if  surface -based  duct  profile  has 
been  specified 

‘.true’.  =  surface -based  duct  exists 
‘.false.’  =  no  surface-based  duct  exists 

N/A 

REFINIT  SU 

levap 

Logical  flag  indicating  if  evaporation  duct  profile  has 
been  specified 

‘.true’.  =  evaporation  duct  exists 
‘.false.’  =  no  evaporation  duct  exists 

N/A 

REFINIT  SU 

l spec 

Logical  flag  indicating  if  grazing  angles  need  to  be 
computed  via  spectral  estimation. 

‘.true.’  =  compute  grazing  angles  by  spectral 
estimation 

‘.false.’  =  do  not  compute  grazing  angles  by  spectral 
estimation 

N/A 

GETANGLES  SU 

Ype 

Array  containing  grazing  angles  computed  from  spectral 
estimation  of  PE  field 

radians 

GETANGLES  SU 

Wray 

Two-dimensional  array  containing  grazing  angles  and 
corresponding  ranges  rmy  computed  from  ray  trace 

radians, 

meters 

GETANGLES  SU 

yflat 

Maximum  range  at  which  the  terrain  profile  remains  flat 
from  the  source 

meters 

Calling  SU 

f hor 

Radio  horizon  range 

meters 

PEINIT  SU 

max 

Maximum  output  range 

meters 

Calling  CSCI 

yfref 

Ground  elevation  height  at  the  source 

meters 

APMINIT  CSC 
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Table  39.  GRAZEJNT  SU  output  data  element  requirements. 


Name 

Description 

Units 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and  DEALLOCATE 

N/A 

statements 

Array  of  interpolated  grazing  angles  at  each  PE  range  step 

radians 

5.1.17  Height  Check  (HTCHECK)  SU 

The  HTCHECK  SU  checks  to  see  if  the  current  traced  height  is  below  the  current 
ground  height.  If  so,  the  SU  will  calculate  the  reflection  point  and  return  with  the 
modified  angle,  range,  and  height  of  the  reflection  point. 

Upon  entering  the  SU  the  following  in-line  functions  are  defined: 

AP  (a,b)=a+bgrd 
b2  —  2 

HP(  a,b,c)=a- 1 - . 

2  3rd 


Next,  the  current  terrain  height  is  determined  according  to 

Kr  =  tyi  +  (r-txi)slpi 

where  i  is  the  terrain  segment  at  the  current  range.  If  the  current  traced  ray  height,  h  i,  is 
greater  than  hter,  then  nothing  is  done  and  the  SU  is  exited.  Otherwise,  the  SU  proceeds 
with  the  following  steps. 

a.  If  the  current  angle  (a\)  is  less  than  zero,  and  both  the  current  traced  ray  height 
(h\)  and  hter  are  less  than  htiv/,  then  nothing  is  done  and  the  SU  is  exited. 

b.  At  this  point  hi  is  less  than  hter  and  appears  to  have  a  valid  reflection  point. 
Therefore,  the  range  at  which  this  occurs  is  then  computed  based  on  solving  a 
quadratic. 


ra=b2  -4 grdc , 
b  =  2(a0-slpi-grdr0), 
c  =  grjro 2  -  2aoro  - 2(o V,  -  h0)+  2slpitxi . 

If  ra  is  greater  than  0,  then  two  possible  range  values  are  determined  in  step  3. 
Otherwise,  the  SU  proceeds  to  step  4. 
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c.  The  two  range  points  are  detennined  according  to 


-b  +  yfra  -b-yfra 

rx,  = - ;  rx-,  = - . 

2  grd  2  grd 

The  two  range  values  are  then  compared  with  the  previous  and  current  range 
values  /"o  and  r\  for  valid  ranges  between  these  two  points.  One  valid  range  is  then 
selected  and  r\  is  set  to  this  value.  If  no  valid  range  is  determined,  then  the  SU 
exits  with  an  ierror  value  of  -100.  If  this  occurs,  please  see  the  APM  developers, 

d.  A  new  angle  and  height  of  the  traced  ray  is  then  detennined  as 

al  =AP(a0,r1  -  r0 ) ;  for  ao<  10° 

h\  -HP(/io,fl])flo)) 

or 

a\ 

K 

and  the  SU  is  then  exited. 

Table  40  and  Table  41  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  HTCHECK  SU  input  and  output  data  element. 


Table  40.  HTCHECK  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

a0 

Starting  angle  of  ray  trace  step 

radians 

RGTRACE  SU 

a\ 

Ending  angle  of  ray  trace  step 

meters 

RGTRACE  SU 

§rd 

Gradient  at  current  ray  trace  step 

M-units/ 

meter 

RGTRACE  SU 

ho 

Starting  height  of  ray  trace  step 

meters 

RGTRACE  SU 

hx 

Ending  height  of  ray  trace  step 

meters 

RGTRACE  SU 

htivi 

Height  of  the  upper  refractivity  level  within  the  current 
layer 

meters 

RGTRACE  SU 

it 

Index  of  the  current  terrain  segment  in  arrays  tx  and  ty 

N/A 

RGTRACE  SU 

r  o 

Starting  range  of  ray  trace  step 

meters 

RGTRACE  SU 

=  a  n 


=  h0+(rl-r0)TAN-'(al)- 


(r,  -r0f  >  f°r  ao  *  10° 


twoka 
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Table  40.  HTCHECK  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

sip 

Slope  of  the  terrain  segment  at  the  current  range. 

N/A 

TERINIT  SU 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

ty 

Height  points  of  terrain  profile 

meters 

TERINIT  SU 

Table  41 .  HTCHECK  SU  output  data  element  requirements. 


Name 

Description 

Units 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and  DEALLOCATE 
statements 

N/A 

d\ 

Ending  angle  of  ray  trace  step 

meters 

h  i 

Ending  height  of  ray  trace  step 

meters 

ihit 

Integer  flag  indicating  if  ray  has  hit  surface: 
ihit  =  0;  ray  has  not  hit  the  surface 
ihit  =1;  ray  has  hit  the  surface 

N/A 

r  i 

Ending  range  of  ray  trace  step 

meters 

5.1.18  Interpolate  Profile  (INTPROF)  SU 

The  INTPROF  SU  performs  a  linear  interpolation  vertically  with  height  on  the 
refractivity  profile,  refref.  Interpolation  is  performed  at  each  PE  mesh  height  point. 

To  interpolate  vertically  at  each  PE  mesh  height,  the  following  iteration  is 
performed.  The  index  j  is  determined  such  that  for  every  7th  PE  bin,  hti  is  just  greater  than 
href  and  j  <  nlvl.  The  interpolated  profile  profint  is  then  detennined  from 


profint f  =  refref +con(refrefj -refref H  ) 


ht ■  -href 


7-1 


href— href 


7  —  1,2, 3, ...77 


where  the  array  ht  and  constant  con  have  been  determined  in  the  APMINIT  CSC. 

Table  42  and  Table  43  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  INTPROF  SU  input  and  output  data  element. 
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Table  42.  INTPROF  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

con 

10% 

meters"1 

APMINIT  CSC 

href 

Heights  of  refractivity  profile  with  respect  to  local  ground 
height 

meters 

PROFREF  SU 

ht 

PE  mesh  height  array  of  size  Hfft 

meters 

PEINIT  SU 

nffi 

Transform  size 

N/A 

FFTPAR  SU 

nlvl 

Number  of  levels  in  new  profile 

N/A 

PROFREF  SU 

refref 

Refractivity  array 

M- units 

PROFREF  SU 

Table  43.  INTPROF  SU  output  data  element  requirements. 


Name 

Description 

Units 

profint 

Profile  interpolated  to  every  Azpe  in  height 

M-units 

5.1.19  PE  Initialization  (PEINIT)  SU 

The  PEINIT  SU  initializes  all  variables  used  in  the  PE  model  for  subsequent  calls 
to  the  PESTEP  SU. 


Upon  entering  the  SU  several  variables  are  initialized.  The  following  PE 
transfonn  variables  are  computed  -  the  angle  (or  p-space)  mesh  size,  A p\  the  Fourier 

transfonn  normalization  constant,  fn0rm',  the  angle  bin  width,  A6,  and  various  transform 
size  factors: 


__  >  f norm  ’  ^34  /4  ^  fft  ’ 


A6=^-, 

k 


nmi=nfft -!>  JU  =/nm. 


4  —  /4  n  fft  '■ 


The  ALLARRAY  PE  SU  is  then  referenced  to  allocate  and  initialize  all  arrays 
associated  with  PE  calculations. 


Next,  the  horizon  range,  rhor,  for  0  receiver  height  and  the  tangent  angle,  acut,  to 
the  radio  horizon  are  computed: 


rhor  =  sjtwoka  *  ant 
a,  =  TAN-1 


ht 

r  am^ 

V  ^ hor  J 
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A  temporary  range  step  variable  is  computed  as 


Art  =  55.67485  +  3.52969  x  1 0‘3r_  -  .01 122x1  (T6 r2max. 


Due  to  numerical  constraints,  limits  will  be  imposed  on  the  PE  range  step  as  follows.  If 
performing  a  terrain  case,  then  the  PE  range  step  is  computed  from 


ArPE  =  MAX  (MIN  (2  £0  Az2PE ,  700.),  Art). 


If  rflx  (previously  detennined  in  the  TERINIT  SU)  is  greater  than  0,  then  the  temporary 


'  f 

range  step  variable  rc[  is  given  by  rd  =  —  and  A rPE  is  recomputed  according  to 

A/-,,,. 


ArPE  =  NINT 


Ar  = _ f- _ 

PE  NINTfrJ 


rfiA  for  rd  <1, 

;  for  r.  >1. 


The  variable  izinc  is  then  initialized  to  1 . 

If  no  terrain  profile  is  specified,  then  Arps  is  given  by 
ArPE  =  MAx(2£o  Az2PE ,  Art,  1 00.) , 

with  the  variable  izinc  initialized  to  1  for  frequencies  greater  than  10  GHz,  2  for 
frequencies  greater  than  5  GHz,  and  3,  otherwise. 

If  the  PEINIT  SU  has  been  referenced  from  the  GET  SU,  then  the  PE  range  step 
(which  in  this  case  will  be  used  for  calculation  of  the  grazing  angle  by  spectral 
estimation)  is  further  modified: 

ArPE  =MAX(zb>£,  150.)- 1 . 

Otherwise,  the  range  step  is  multiplied  by  the  range  step  modifier  rmuit. 

The  number  of  PE  range  steps  is  then  computed: 
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iPF  =NINT 


'  r  A 

max 

V  ~PE  J 


+  1. 


If  a  terrain  profile  has  been  specified,  the  terrain  elevations  at  each  PE  range  step 
are  now  interpolated  from  the  user-specified  profile  and  stored  in  array  tyh.  The  array  is 
allocated  for  size  ips,  the  range  r  is  initialized  to  0,  and  the  elements  in  tyh  are  determined 
according  to 


tyhf  =  tyk  +  slpk  (r  -  txk  },  i  =  1, 2, iPE , 


where  r  is  iAiyp  and  the  index  k  is  detennined  such  that  tx/<  r  <  tXk+i.  The  tangent  of  each 
angle  determined  from  the  terrain  slopes  are  stored  in  array  tang. 

The  filter  array,  jilt,  for  subsequent  filtering  of  the  PE  field,  is  given  by 

r  \ 


fiit,  =  X + X  cos 


TZ 


K  n4  ) 


/  -  1,  2,  aaa,  IT  A 


The  PE  mesh  height  array  ht  is  next  given  by 

h  t  ■  i  Az  pE ,  i  1, 2,  •  •  *,  ^  fft , 


Next,  the  free-space  propagator  array  frsp  is  computed  for  subsequent  use  in  the 
PESTEP  SU.  The  propagator  term  is  computed  at  each  PE  angle,  or  p-space,  mesh  point 
using  the  wide-angle  propagator.  A  filter,  or  attenuation  function  (frequently  called 
“window”),  is  then  applied  to  the  upper  one-quarter  of  the  array  corresponding  to  the 
highest  one-quarter  of  the  maximum  propagation  angle. 

The  complex  free-space  propagator  phase  array  frsp  is  given  by 


it±rPE{JkffjSpf  ■ . 

frsp  j  ~  f norm^  ,  J  =0,1,2,...,  nfft, 

where  /  is  the  imaginary  number  .  The  upper  one-quarter  of  the  free-space 
propagator  array  is  filtered  by  a  cosine-tapered  (Tukey)  filter  array,  jilt,  according  to 

frsp  j  =filtj_n^  frsp  j ;  j  =  n34,n34  +l,n34  +2,...,nfft. 
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If  a  simple  environmental  case  has  been  specified  with  no  terrain  and  a  range- 
independent  refractivity  profile,  then  the  INTPROF  SU  is  referenced  for  interpolation  of 
the  refractivity  at  every  PE  mesh  point.  The  z-space  propagator  array  envpr  is  then 
computed  from 


envpr j  =  e 


iArPEprofintj  % 

5 


j  —  O5 1?  2, rijyt , 


where  /  is  the  imaginary  number  V-l  and  profint  is  the  sampled  profile  obtained  from 
the  INTPROF  SU.  The  upper  V*  of  envpr  is  filtered  by  a  cosine-tapered  (Tukey)  filter 
array,  jilt,  according  to 

envpr  j  =filtJ_n^  envpr f ;  forj  =  nM ,  n34  +  1,  n34  +  2,...,  n  fft  . 

Finally,  the  XYINIT  SU  is  referenced  to  determine  the  initial  PE  solution  and  the 
SU  is  exited. 

Table  44  and  Table  45  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  PEINIT  SU  input  and  output  data  element. 


Table  44.  PEINIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ant ht 

Transmitting  antenna  height  above  local  ground 

meters 

Calling  CSCI 

Azpe 

Bin  width  in  z-space 

meters 

FFTPAR  SU 

J MHz 

Frequency 

MHz 

Calling  CSCI 

fter 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

Iflag 

Integer  flag  indicating  where  in  the  APMINIT  CSC  the 
PEINIT  SU  is  being  referenced 

0  =  called  before  reference  to  GETANGLES  SU 

1  =  called  for  “real”  PE  run 

N/A 

Calling  SU 

iPi 

Polarization  flag 

0  =  horizontal 

1  =  vertical 

N/A 

Calling  SU 

Itpa 

Number  of  height/range  points  pairs  in  terrain  profile  arrays 
tx,  ty 

N/A 

TERINIT  SU 

k0 

Free-space  wavenumber 

meters"1 

APMINIT  CSC 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

W prof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 
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Table  44.  PEINIT  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

N/A 

Calling  CSCI 

ffix 

Fixed  range  increment  of  terrain  profile 

meters 

Calling  SU 

ft max 

Maximum  specified  range 

meters 

Calling  CSCI 

ft mult 

PE  range  step  multiplication  factor 

N/A 

Calling  CSCI 

sip 

Slope  of  each  segment  of  terrain 

N/A 

TERINIT  SU 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

TERINIT  SU 

Zmax 

Total  height  of  the  FFT/PE  calculation  domain 

meters 

FFTPAR  SU 

Table  45.  PEINIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

&cut 

Tangent  angle  from  antenna  height  to  radio  horizon 

radians 

Ar pE 

PE  range  step 

meters 

Ap 

P-space  mesh  size 

radians/ 

meters 

A9 

Angle  bin  width 

radians 

envpr 

Complex  [refractivity]  phase  term  array  interpolated  every  Azpp  in  height 

N/A 

flit 

Cosine-tapered  (Tukey)  filter  array 

N/A 

fnorm 

Normalization  factor 

N/A 

frsp 

Complex  free  space  propagator  term  array 

N/A 

ht 

PE  mesh  height  array  of  size  rifft 

meters 

terror 

Integer  variable  indicating  error  number  for  ALLOCATE  and  DEALLOCATE 
statements 

N/A 

lPE 

Number  of  PE  range  steps 

N/A 

tZinc 

Integer  increment  for  storing  points  at  top  of  PE  region  (i.e.,  points  are  stored  at 
every  izinc  range  step) 

N/A 

n34 

%  Tlffl 

N/A 

n4 

V*  riffi 

N/A 

W  ml 

nffiA 

N/A 

ft hor 

Radio  horizon  range 

meters 

tang 

Tangent  of  angle  array  from  terrain  slopes. 

radians 

tyh 

Adjusted  height  points  of  terrain  profile  at  every  PE  range  step. 

meters 

u 

Complex  PE  field 

pV/m 
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5.1 .20  Poly  4  (FN  POLY4)  Function 

The  real,  double  precision  function  FN  POLY4  evaluates  a  4th  order  polynomial 
in  the  independent  variable,  X,  for  the  SURFIMP  SU.  It  returns  the  real  (imaginary)  part 
of  the  complex  nonnalized  surface  impedance  to  the  SURFIMP  SU.  The  expression 
evaluated  is 


fa  =  const45X4  +  const4AX 3  +  const  43X'  +  const42X  +  const4x . 

Variables  passed  to  the  POLY4  function  by  the  SURFIMP  SU  are  the  frequency 
in  megahertz  and  the  array  of  five  coefficients  needed  to  evaluate  the  polynomial. 

Table  46  and  Table  47  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  POLY4  function  input  and  output  data  element. 


Table  46.  FN_POLY4  input  data  element  requirements. 


Name 

Description 

Units 

Source 

const4 

Polynomial  coefficients  array 

See  a 

Calling  SU 

X 

Independent  variable  (frequency) 

MHz 

Calling  SU 

a  1/tMHz)"'1  where  n=l,2,3,4,5 


Table  47.  FN_POLY4  output  data  element  requirements. 

Name 

Description 

Units 

fa 

Real  (imaginary)  part  of  normalized  surface  impedance 

N/A 

5.1.21  Poly  5  (FN  POLY5)  Function 

The  real,  double-precision  function  FN  POLY5  evaluates  a  5th  order  polynomial 
in  the  independent  variable,  X,  for  the  SURFIMP  SU.  Each  call  of  the  routine  returns  one 
element  of  the  array  const4,  which  is  used  in  the  FN_POLY4  SU.  The  expression 
evaluated  is 


fa  =  const  5  6X 5  +  const55X4  +  const  54X3  +  const53X^  +  const  5  2X  +  const  5,. 

Variables  passed  to  the  FN  POLY5  function  by  the  SURFIMP  SU  are  the  wind 
speed  in  knots  and  the  set  of  six  polynomial  coefficients  needed  to  evaluate  the 
polynomial. 

Table  48  and  Table  49  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  POLY5  function  input  and  output  data  element. 
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Table  48.  FN_P0LY5  input  data  element  requirements. 


Name 

Description 

Units 

Source 

const5 

Polynomial  coefficients  array 

See  a 

Calling  SU 

X 

Independent  variable  (wind  speed) 

knots 

Calling  SU 

a  l/(MHz  )n'1(knots)“'1  where  n=l,2,3,4,5,6 


Table  49.  FN_P0LY5  output  data  element  requirements. 


Name 

Description 

Units 

fa 

Element  of  the  array  const4 

See  a 

a  l/(MHz)”_1  where  n=l,2,3,4  or  5 


5.1.22  Profile  Reference  (PROFREF)  SU 

The  PROFREF  SU  adjusts  the  current  refractivity  profile  so  that  it  is  relative  to  a 
reference  height,  yref  The  reference  height  is  initially  the  minimum  height  of  the  terrain 
profile.  Upon  subsequent  calls  from  the  PESTEP  SU,  the  refractivity  profile  is  adjusted 
by  the  local  ground  height  at  each  PE  range  step. 

The  reference  height  yre/,  depending  on  the  value  of  ij iag,  can  be  hmmler  or  the  local 
ground  height  above  hminter.  If  iflag  is  0,  the  profile  arrays  ref  ref  and  href  will  be  relative  to 
hmmter  and  will  also  be  used  to  initialize  refdum  and  htdum  .  If  |  |  is  1 ,  then  the  profile 

arrays  refref  and  href  will  be  referenced  to  the  local  ground  height.  The  parameter  hminter 
is  the  reference  height  for  internal  calculations  in  the  APM  CSCI  of  the  complex  field  U. 
Arrays  refdum  and  htdum  are  dummy  arrays  containing  refractivity  values  and  height 
values,  respectively,  for  the  currently  interpolated  profile. 

Determining  refref  and  href  proceeds  as  follows.  First,  the  index  nlvl  is  initialized 
to  the  number  of  refractivity  levels,  Ivlep,  in  refdum  and  htdum;  and  refref  and  href  are 
initialized  to  zero.  Next,  a  test  is  made  to  detennine  whether  the  absolute  value  of  the 
reference  height  yref  is  greater  than  10'  (i.e.,  is  yref  greater  than  approximately  0).  If  y ref  is 
approximately  zero,  the  elements  of  refref  are  set  equal  to  the  corresponding  M-unit 
values  of  refdum,  and  the  elements  of  href  are  set  equal  to  the  corresponding  height 
values  of  htdum  and  the  SU  is  exited. 

For  the  case  when  yref  is  not  zero,  the  following  calculations  are  made.  First,  the 
flag  ib,nsi  and  the  index  js  are  set  equal  to  zero  and  minus  one,  respectively.  Then,  yref  is 
tested  to  determine  if  it  is  below  mean  sea  level.  If  so,  ibmsi  and  j  are  set  equal  to  one  and 
zero,  respectively.  If  yref  is  not  below  mean  sea  level,  then  the  refractivity  profile  level  at 
which  yref  is  just  above  is  determined.  The  index  j  is  determined  such  that 
htdum  j  <  yref  <  htdum  j+l . 
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The  refractivity  at  v;e/is  now  computed  from 


/  \  vref  -  htdum 

rmu  =  refdum  +  [refdum  +1  -  refdum  ■ I — : — - . 

7  -  7  htdum  -+1  -  htdum  ■ 

If  y,.e/ falls  below  mean  sea  level  and  the  extrapolation  flag  iextra  is  zero,  then  rmu  is  given 
by 


yrpf  -  htdum  , 

r/mt  =  refdum  +0.1 18  — - — - - —  . 

htdum  -+1  -  htdum j 

The  first  element  in  refref  and  Are/  is  now  set  equal  to  raw  and  0,  respectively. 
The  number  of  refractivity  levels  in  the  arrays  is  now  lnew=nlvl-j  and  the  remainder  of 

the  current  refractivity  profile  is  adjusted  in  height  and  stored  in  refref  and  href  according 
to 


refref  =refdumk 

href  =htdumk ~yref',  i  =  1,2,3 ,...,lnew, 

where  the  index  k  is  initialized  to  j+ 1  and  is  incremented  by  one  with  each  iteration  of  i. 
The  variable  nlvl,  indicating  the  number  of  levels  in  the  newly  created  profile,  is  now  set 

to  Inew • 


Finaly,  if  i  /lag  equals  zero,  then  Ivlep  is  set  equal  to  nlvl  and  refref  and  href  are 
used  to  initialize  refdum  and  htdum,  respectively,  before  exiting. 

Table  50  and  Table  51  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  PROFREF  SU  input  and  output  data  element. 


Table  50.  PROFREF  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINTER  SU 

l  extra 

Extrapolation  flag  for  refractivity  profiles  entered  below 
mean  sea  level 

N/A 

Calling  CSCI 

0  =  extrapolate  to  minimum  terrain  height  standard 
atmosphere  gradient 

1  =  extrapolate  to  minimum  terrain  height  using  first 
gradient  in  profile 
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Table  50.  PROFREF  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

iflag 

Integer  flag  indicating  height  at  which  to  reference  the 
refractivity  profile 

0  =  adjust  profile  relative  to  hminter 

1  =  adjust  profile  relative  to  local  ground  height  above 
h 

nminter 

N/A 

Calling  SU 

Ivlep 

Number  of  height/refractivity  levels  in  profile  refdum  and 
htdum 

N/A 

Calling  CSCI 

refdum 

M-unit  array  for  current  interpolated  profile 

M-units 

REFINTER 

y>-ef 

Ground  elevation  height  at  current  range 

meters 

Calling  SU 

Table  51 .  PROFREF  SU  output  data  element  requirements. 


Name 

Description 

Units 

href 

Height  array  for  current  interpolated  profile 

meters 

htdum 

Dummy  array  containing  height  values  for  current  (horizontally  interpolated) 
profile 

meters 

Ivlep 

Number  of  height/refractivity  levels  in  profile 

N/A 

nlvl 

Number  of  levels  in  new  profile 

N/A 

refdum 

M-unit  array  for  current  interpolated  profile 

M-units 

refref 

Refractivity  array 

M-units 

5.1.23  Refractivity  Initialization  (REFINIT)  SU 

The  REFINIT  SU  checks  for  valid  environmental  profile  inputs  and  initializes  all 
refractivity  arrays  used  within  one  application  of  APM. 

Upon  entering,  the  maximum  height  hiarge  at  which  the  refractivity  profile  is 
extrapolated  is  set  to  106  meters  in  a  DATA  statement.  In  addition,  ierror  is  initialized  to 
zero. 


The  environmental  data  are  checked  to  determine  if  range-dependent  profiles  have 
been  specified  (npmf  >  I ).  If  so,  the  range  of  the  last  profile  entered,  rngprof  \  ^  is 

checked,  and  if  it  is  less  than  the  maximum  output  range  specified,  rmax  ,  an  error  message 
is  returned  (i.e.,  ierror  is  set  equal  to  -12)  depending  on  the  value  of  the  error  flag,  lerr  12, 
set  in  the  calling  CSCI  application  itself.  The  SU  is  then  exited;  otherwise,  if  no  error 
occurs,  the  SU  proceeds  to  the  next  step. 
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Next,  the  REFINIT  SU  tests  for  valid  refractivity  level  entries  for  each  profile. 
Every  user-specified  profile  is  tested  to  make  sure  the  first  level  in  the  profile  begins  with 
a  value  of  zero  height  (or  less  than  zero,  if  the  first  level  is  below  mean  sea  level).  If  it 
does  not,  ierror  is  set  to  -13  and  the  SU  is  exited;  otherwise,  the  SU  proceeds  to  the  next 
step. 


A  test  is  then  made  to  determine  if  the  last  gradient  in  each  profile  is  negative.  If 
the  last  gradient  in  any  profile  is  negative,  ierror  is  set  to  -14  and  the  SU  is  exited; 
otherwise,  an  additional  refractivity  level  is  extrapolated  to  height  hiarge  and  added  to  each 
profile.  The  additional  level  is  added  according  to 


hmsllvlp,i  =  hlarge. 


refmsllvlpi  =  refmsllvlp_Xi  +  grd[h 

large  ~hmsllvlp_  i,.] 


i  =  1, 2, 3,  ...n 


prof 


where 


grd  =  - 


refmsllvl,i-refmsli 


lvlp—2,i 


hmslMp-l,i  -  hms/MP-2J 


The  counter  for  the  current  profile,  is,  is  now  initialized  to  1  and  the  range  of  the 
next  refractivity  profile,  rv2,  is  initialized  to  rngprof .  Next,  the  results  of  the 

extrapolation  of  the  first  environmental  profile  (i.e.,  the  profile  at  range  0)  are  transferred 
to  dummy  arrays,  htdum  and  refdum,  respectively.  The  index  Ivlep  is  now  set  equal  to 
Ivlp.  Duplicate  levels  in  the  first  profile  are  removed  by  a  reference  to  the  REMDUP  SU, 
and  refdum  and  htdum  are  adjusted  to  the  minimum  terrain  height  by  a  reference  to  the 
PROFREF  SU.  The  parameter  nlvl,  returned  from  the  PROFREF  SU,  is  now  the  number 
of  height/ refractivity  levels  in  the  adjusted  htdum  and  refdum  arrays. 


If  troposcatter  calculations  have  been  specified  (Tropo  =  ‘.true.’),  then  the  surface 
refractivity  at  the  transmitter  snrefx  is  determined  by  referencing  the  PROFREF  SU  to 
adjust  the  profile  relative  to  y/ref  and  initializing  snrefx  to  refrej o. 

Next,  the  height  and  thickness  of  the  highest  trapping  layer  (if  one  exists),  htmp 
and  hthick,  respectively,  are  found  relative  to  hminter-  First,  htrap  and  h thick  are  initialized  to 
zero.  Then,  steps  1  through  2  are  perfonned  for  each  z'th  profile  and  for  each /h  refractivity 
level. 


1.  The  gradient  of  the  current  height/refractivity  level  grd  and  its  height  relative  to 
hminter,  hp\,  are  found  from 


grd  =  refnslj+l .  -  refmsl 


j+\,i 

hpX  =  hmslJ+u  -  hminter 


Jd 
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2.  If  grd  is  negative  and  hp\  is  greater  than  h,mp,  then  htrap  is  set  equal  to  hp\,  and  hp o  and 
hthick  are  detennined  from 


hp0  =  hmslj.j  -  hminter 

hthick  =  hp\  —  hpo 


Next,  the  index  level  istan\  within  the  refractivity  profile  of  the  antenna  height 
antref  is  determined  and  the  gradient  array  grdum  is  computed  as 


grdum  t  =10 


refdumi+]  -  refdum , 
v  htdumi+l  -  htdunij  j 


;  /  =  0, 1, 2,  ....,lvlep  -  1 . 


If  using  the  full  hybrid  mode  (hybrid  =  1),  then  follow  steps  1  through  4  to  build 
arrays  associated  with  RO  calculations.  Otherwise,  the  M-unit  value  rmtx  at  the  antenna 
height  is  determined  from 


rm , ,  =  1 0 


refdumi 


lstart\ 


+  grdum :  1 0 

°  1  start  1 


\ttntrej  -  htdurrij  t  ; 


)J 


and  the  SU  continues  with  the  procedures  after  step  4. 

1 .  First,  the  refractivity  and  height  arrays  rm  and  zrt  are  built.  All  elements  in  zrt  are  set 
equal  to  all  elements  in  htdum.  An  additional  height  level,  equal  to  antref,  is  included 
in  zrt  and  the  index  istart  is  initialized  to  that  height  level  that  corresponds  to  antref. 
Array  rm  is  given  by 


rnij  =  1 0  6  refdum  j ,  /  =  1, 2, 3, nlvl , 

with  the  refractivity  level  at  height  antref  interpolated  according  to 


rm, 

1  start 


=  rm} 


,+l 


+  \antref  -  zrtisl 


4  rm,  , ,  -  rm, 

I  '  start  1 _ 'start  1 

1  zrt:  +1  -  zrtt  _j 

V  1  start  ^  '  1  start  1 


The  total  number  of  levels  levels  in  zrt  is  reduced  by  1  since  the  highest  level  is  not 
needed. 

2.  For  the  special  case  when  the  terrain  profile  is  initially  flat  but  at  non-zero  height, 
perform  steps  2. a  through  2.d  to  adjust  the  refractivity  arrays  rm  and  zrt  associated 
with  RO  calculations.  First,  the  index  nlevel  is  initialized  to  the  number  of  refractivity 
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levels,  levels',  yref  is  initialized  to  ty\,  refref  and  href  are  initialized  to  zero;  and  the 
index  js  is  initialized  to  -1. 


a.  Next,  js  is  detennined  such  that  zrtjs  <  yref  <  zrtjs+l .  If  a  value  for  js  is  not  found 

such  that  this  condition  holds  true  (i.e.,75  remains  at  -1),  then  the  SU  proceeds 
with  step  2.d. 

b.  The  refractivity  at  v,e/is  now  computed  from 

,  yref  ~  zrtjs 

J  rac  ,  ,  ’ 

zrtjs+ 1  -  zrtjs 

rmu  =  rmjs  +  frac  (rmjs+1  -  rmjs ). 

If  INT(//m.)  is  equal  to  1,  then  js  is  set  equal  to  js+l.  The  temporary  counter  lnew  is 
initialized  to  nlevel-js. 

c.  The  first  element  in  refref  and  href  is  now  set  equal  to  rmu  and  0,  respectively. 
The  remainder  of  the  current  refractivity  profile  is  adjusted  in  height  and  stored  in 
refref  and  href  according  to 

refref j  =rmk 

href i=zrtk-yref;  j  =  1,2,3  ,...lnew, 

where  the  index  k  is  initialized  to  js+ 1  at  the  start  and  is  incremented  by  one  with 
each  iteration  of  j.  The  variable  levels,  indicating  the  number  of  levels  in  the 
newly  created  profile,  is  now  set  to  lnew.  refref  and  href  are  now  used  to  initialize 
rm  and  zrt. 

d.  The  variable  istart  is  now  reduced  by  the  amount  js. 

3.  The  arrays  gr  and  q,  used  in  RO  and  ray-tracing  calculations,  are  detennined  next. 
The  gradient  array  gr  is  given  by 

rm..,  -  mi,  „  ,  _ 

gr,  = - ;  /  =0,1, 2, ... levels , 

zrtM  -zrt, 

The  array  q  is  given  by 

q,  =2 (rmi+l  -  rm  ■ );  i  =  0, 1, 2, ...,  levels  . 
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4.  The  M-unit  value  rm,x  at  the  antenna  height  is  now  set  equal  to  f^nistart- 


Next,  the  minimum  M-unit  value  rmmin  of  the  refractivity  at  range  0  is  determined 
by  searching  for  the  minimum  numerical  value  in  arrray  refdum  and  assigning  nnmm  this 
value.  The  maximum  M-unit  value  rmmax  at  or  below  the  antenna  height  is  then 
determined  from 


rmmax  =  MAx(l 06 rmtx ,  refdum  t ),  /  =  0, 1, 2, istartl . 

Both  rm-min  and  rmmax  are  then  multiplied  by  10'6.  If  the  antenna  is  within  a  duct,  the  flag 
Iduct  is  set  to  ‘.true.’  and  the  critical  angle  acrit  is  computed  as 

acnt  =  V2(r/”<*  -rcrit)  +  10  6, 

where  rcn,  is  the  minimum  M-unit  value  in  the  profile  for  levels  above  the  height  antrej. 

Finally,  a  check  is  made  to  determine  if  an  evaporation  profile  exists.  This  check 
is  performed  only  if  a  range-independent  profde  has  been  specified  (nprof  =  1 )  and  if  h,rap 
is  greater  than  0.  An  evaporation  duct  is  assumed  to  exist  if  the  height  at  which  rmmin 
occurs  is  less  than  50  m  and  if  the  second  derivative  of  the  profile  is  greater  than  an 
arbitrarily  set  100  M-units/m  .  If  these  two  conditions  occur,  then  the  flag  levap  is  set  to 
‘.true.’. 


Table  52  and  Table  53  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  REFINIT  SU  input  and  output  data  element. 


Table  52.  REFINIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ClYlt ref 

Transmitting  antenna  height  relative  to  the  reference 
height  hfnifjter 

meters 

TERINIT  SU 

fter 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

h 

,lminter 

Minimum  height  of  terrain  profile 

meters 

TERINIT  SU 

hmsl 

Two-dimensional  array  containing  heights  with  respect 
to  mean  sea  level  of  each  profile.  Array  format  must  be 
hmsljj  =  height  of  ith  level  of  j'h  profile;  j=  1  for  range- 
independent  cases 

meters 

Calling  CSCI 
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Table  52.  REFINIT  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  FEDR  +  PE  model 

1  =  hill  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

Ierrl2 

User-provided  error  flag  that  will  trap  on  certain  errors  if 
set  to  ‘.true.’ 

N/A 

Calling  CSCI 

Ivlp 

Number  of  height/refractivity  levels  in  profiles 

N/A 

Calling  CSCI 

nprof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 

refmsl 

Two-dimensional  array  containing  refractivity  with 
respect  to  mean  sea  level  of  each  profile.  Array  format 
must  be  refmslij  =  M-unit  at  ith  level  of ]"'  profile;  j=  1 
for  range-independent  cases 

M-unit 

Calling  CSCI 

F max 

Maximum  range 

meters 

Calling  CSCI 

rngprof 

Ranges  of  each  profile,  rngprof  =  range  of  1th  profile 

meters 

Calling  CSCI 

tery 

Dynamically  allocated  terrain  profile  height  array 

meters 

Calling  CSCI 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

TERINIT  SU 

Table  53.  REFINIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

&crit 

Critical  angle 

radians 

gr 

Intermediate  M-unit  gradient  array,  RO  region 

(M-unit/m)10"6 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum  and  refdum 

M-units/meter 

hmsl 

Two-dimensional  array  containing  heights  with  respect  to  mean  sea  level 
of  each  profile.  Array  format  must  be  hmsln  =  height  of  i,h  level  of  jth 
profile;  /=1  for  range-independent  cases 

meters 

htdum 

Height  array  for  current  interpolated  profile 

meters 

h  thick 

Thickness  of  highest  trapping  layer  from  all  refractivity  profiles 

meters 

h 

"trap 

Height  of  highest  trapping  layer  from  all  refractivity  profiles 

meters 

terror 

Integer  value  that  is  returned  if  any  errors  exist  in  input  data 

N/A 

is 

Counter  for  current  profile 

N/A 

t-start 

RO  height  index  at  antenna  height 

N/A 

t  start  1 

Refractivity  level  index  within  htdum  at  antref 

N/A 

iduct 

Logical  flag  indicating  if  surface -based  duct  profile  has  been  specified 
‘.true’.  =  surface -based  duct  exists 
‘.false.’  =  no  surface-based  duct  exists 

N/A 

ievap 

Logical  flag  indicating  if  evaporation  duct  profile  has  been  specified 
‘.true’.  =  evaporation  duct  exists 
‘.false.’  =  no  evaporation  duct  exists 

N/A 

levels 

Number  of  levels  defined  in  zrt,  rm,  q,  and  gr  arrays 

N/A 
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Table  53.  REFINIT  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

Ivlep 

Number  of  height/refractivity  levels  in  profile  htdum,  refdum 

N/A 

h’lp 

Number  of  user-specified  levels  in  refractivity  profile  (for  range  dependent 
case  all  profiles  must  have  same  number  of  levels) 

N/A 

nlvl 

Number  of  height/refractivity  levels  in  profile  refref  href 

N/A 

q 

Intermediate  M-unit  difference  array,  RO  region 

M-unit  10'6 

refdum 

M-unit  array  for  current  profile 

M-unit 

refinsl 

Two-dimensional  array  containing  refractivity  with  respect  to  mean  sea 
level  of  each  profile.  Array  format  must  be  refinsl^  =  M-unit  at  f'  level  of 
fh  profile;y=l  for  range-independent  cases 

M-unit 

rm 

Intermediate  M-unit  array,  RO  region 

M-unit  10'6 

ff^l/nax 

Maximum  M-unit  value  of  refractivity  profile  at  range  0 

meters 

FWlmin 

Minimum  M-unit  value  of  refractivity  profile  at  range  0 

meters 

rmtx 

M-unit  value  at  height  antref 

meters 

rv2 

Range  of  the  next  refractivity  profile 

meters 

snrefx 

Surface  refractivity  at  transmitter 

M-unit 

snrefo 

Surface  refractivity  taken  from  of  the  reference  profile  with  respect  to 
mean  sea  level 

M-unit 

zrt 

Intermediate  height  array,  RO  region 

meters 

5.1.24  Remove  Duplicate  Refractivity  Levels  (REMDUP)  SU 

The  REMDUP  SU  is  to  remove  any  duplicate  refractivity  levels  in  the  current 
interpolated  profile.  Adjoining  profile  levels  are  checked  to  see  if  the  heights  are  within 
0.001  m.  If  they  are,  the  duplicate  level  in  the  profile  is  removed.  This  process  continues 
until  all  profde  levels  ( Ivlep )  have  been  checked. 

Table  54  and  Table  55  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  REMDUP  SU  input  and  output  data  element. 


Table  54.  REMDUP  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINIT  SU 
REFINTER  SU 

Ivlep 

Number  of  height/refractivity  levels  in  profile 

N/A 

REFINIT  SU 
REFINTER  SU 

refdum 

M-unit  array  for  current  interpolated  profile 

M-unit 

REFINIT  SU 
REFINTER  SU 
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Table  55.  REMDUP  SU  output  data  element  requirements. 


Name 

Description 

Units 

htdum 

Height  array  for  current  interpolated  profile 

meters 

Ivlep 

Number  of  height/refractivity  levels  in  profile 

N/A 

refdum 

M-unit  array  for  current  interpolated  profile 

M-unit 

5.1.25  RG  Trace  (RGTRACE)  SU 

The  RGTRACE  SU  performs  ray  traces  of  many  rays  launched  within  an  angle  of 
±4°.  All  angles  from  rays  striking  the  surface  are  then  sorted  and  stored  for  subsequent 
interpolation  in  the  GRAZEINT  SU. 

Upon  entering  the  SU,  two  in-line  ray  trace  functions  are  defined  for  general 
parameters  a,  b,  and  gnf-  RADA1  and  RP.  These  function  definitions  are  identical  to 
those  given  in  Section  5.1.15. 

Rays  are  traced  with  different  angular  increments  at  varying  intervals.  Angular 
increments  are  determined  such  that  1500  rays  will  be  traced  between  the  angular  interval 
±0.5°,  1000  rays  will  be  traced  with  launch  angles  between  |  0.5°  |  and  \0t\,  and 
500  rays  will  be  traced  for  angles  between  |  8,  |  and  |  8mxg  \  .  The  angular  increments  are 
computed  as 


<A// c;  |  = 
ainc2  = 
ainc3  = 


0, 

1500’ 

JL 

500  ’ 

8  - 

mxg 

250 


0t 


5 


where  6,  is  1°  for  hybrid  equal  to  1  and  1.5°,  otherwise.  The  maximum  number  of  rays  to 
trace,  nray,  is  then  initialized  to  a  large  value  of  10  times  the  amount  specifed  above. 

Next,  the  grazing  angle  array  y/rav  is  allocated  and  initialized  with  the  first  element 
set  equal  to  Viz.  The  height  of  the  terrain  y,  at  the  current  traced  range  step  is  initialized  to 
0,  or  tyh\  if  a  terrain  profile  has  been  specified  (/?£,•=’. true.’).  The  number  of  grazing 
angles  igrz  and  the  launch  angle  a  launch  are  initialized  to  0  and  -8mxg,  respectively.  A  DO 
loop  is  now  implemented  where  the  following  steps  1  through  4  are  perfonned  an  nray 
number  of  times. 

1 .  At  the  start  of  the  ray  trace,  the  current  local  angle  (ao),  range  (ro),  height  (ho),  and 
refractive  gradient  index  (j)  are  initialized  to  aiaunch,  0,  antref,  and  wn,  respectively. 
The  index,  it,  of  the  terrain  segment  at  the  current  traced  range  is  also  initialized  to  1 . 
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2.  If  the  antenna  height  antref  is  at  an  inflection  point  in  the  refractivity  profile  and  ao  is 
less  than  0,  the  index  j  is  decremented  by  1.  The  current  range  to  trace  to,  ro,  is 
initialized  to  0. 

3.  A  loop  is  now  begun  to  trace  a  ray  starting  with  launch  angle  aiaunch  to  every  PE  range 
step.  The  current  range  to  trace  to,  ro,  is  incremented  by  ArPE  and  steps  0  through  3.e 
are  performed  until  one  of  the  following  conditions  are  met:  ro  reaches  ro,  ho  reaches 
htnm,  or  the  difference  in  reflection  range  between  consecutive  grazing  angles  is  less 
than  10'  .  All  references  to  the  index  i  in  the  steps  below  refer  to  the  index  in  this  loop 
varying  from  1  to  the  number  of  PE  range  steps,  iPE. 

a.  The  TRACE  STEP  SU  is  referenced  to  detennine  the  new  angle  (ai),  height  (hi), 
and  range  (A)  at  the  end  of  the  traced  step. 

b.  Once  r\,  hi,  and  ci\  have  been  computed,  it  must  be  determined  if  h\  is  above  the 
height  maximum  htnm.  If  so,  then  h\  is  set  equal  to  htum  and  a  new  ai  and  r{  are 
computed: 

Oj  =  -J RADA  l(a0 ,  hx  -  h0 ) 
r\  =RP(fl),a1-a0). 

c.  If  the  ray  has  hit  the  surface  and  is  reflected,  which  would  be  the  condition  for 
which  the  index  j  is  equal  to  0,  then  the  grazing  angle  and  the  angle  of  reflection 
with  respect  to  the  horizontal  are  computed  as 

W  =  TAN  1  {sip ft )  a.\ 
aref  = 2  TAN~V/?,.,)-ai. 

The  range  r\  and  grazing  angle  are  then  stored  for  later  use  in  the  GRAZE  INT 
SU. 

d.  In  preparation  for  the  next  ray  trace  step,  ho  is  set  equal  to  hi,  r0  is  set  equal  to  r\, 
and  ao  is  set  equal  to  aref.  If  ao  is  greater  than  Viz,  or  if  n  has  reached  ro,  then  the 
current  iteration  is  exited  and  the  SU  proceeds  to  step  3.e;  otherwise,  steps  0 
through  3.d  are  repeated  until  r0  reaches  ro. 

e.  The  range  ro  [to  trace  to]  for  the  next  step  is  incremented  by  ArPE  and  step  3  is 
repeated  for  all  range  steps. 

4.  Once  a  ray  has  been  traced  through  the  entire  iPE  number  of  range  steps,  aiaunch  is 
increased.  If  I  aiaunch\  is  less  than  0.5°,  the  launch  angle  is  increased  by  aincv. 
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otherwise,  if  I  aiaunch  I  is  less  than  0t,  then  it  is  increased  by  ainc2.  If  neither  of  these 
conditions  are  met,  then  aiamch  is  increased  by  ainc^.  Steps  1  through  4  are  repeated 
until  an  nmy  number  of  rays  have  been  traced. 

Finally,  the  grazing  angles  are  sorted  by  range  and  stored  in  array  y/my  and  the  SU 
is  exited. 

Table  56  and  Table  57  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  RGTRACE  SU  input  and  output  data  element. 


Table  56.  RGTRACE  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

cintref 

Transmitting  antenna  height  relative  to  the  reference  height 
h 

,lminter 

meters 

TERINIT  SU 

AfpE 

PE  range  step 

meters 

PEIN1T  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum  and 
refdum 

M-units/ 

meter 

REFINTER  SU 

hmax 

Maximum  output  height  with  respect  to  mean  sea  level 

meters 

Calling  CSCI 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINTER  SU 

htlim 

User-supplied  maximum  height  relative  to  hminter,  i.e.,  htnm 
=h  h 

flmax  riminter 

meters 

TERINIT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  FEDR  +  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

l startl 

Refractivity  level  index  within  htdum  at  antref 

N/A 

REFINIT  SU 

max 

Maximum  output  range 

meters 

Calling  CSCI 

,9 

x-'mxg 

Maximum  PE  calculation  angle  for  spectral  estimation  of 
grazing  angles 

radians 

APMINIT  CSC 

sip 

Slope  of  each  segment  of  terrain 

N/A 

TERINIT  SU 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

Table  57.  RGTRACE  SU  output  data  elements  requirements. 


Name 

Description 

Units 

Igrz 

Number  of  grazing  angles  computed  from  ray  trace 

N/A 

y^ray 

Two-dimensional  array  containing  grazing  angles  and  corresponding  ranges 

radians, 

computed  from  ray  trace 

meters 
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5.1.26  Terrain  Initialization  (TERINIT)  SU 

The  TERINIT  SU  examines  and  initializes  terrain  arrays  for  subsequent  use  in  PE 
calculations.  It  tests  for  and  determines  a  range  increment  if  it  is  found  that  range/height 
points  are  provided  in  fixed  range  increments.  The  minimum  terrain  height  is  determined, 
and  the  entire  terrain  profile  is  adjusted  in  height  so  that  all  internal  calculations  are 
referenced  to  this  height.  This  is  done  to  maximize  the  PE  transform  calculation  volume. 

First,  several  variables  are  initialized.  The  integer  flag,  ierror,  which  is  returned  if 
any  errors  exist  in  input  data,  is  set  equal  to  zero.  The  maximum  tangent  ray  angle,  au, 
from  source  to  terrain  peak  along  the  profile  path,  is  set  equal  to  zero.  The  minimum 
height  of  the  terrain  profile,  hminter,  is  set  equal  to  zero.  The  transmitting  antenna  height, 
antref,  relative  to  the  reference  height  hminte>;  is  set  equal  to  anti,t.  The  maximum  terrain 
height,  htermax,  along  the  profile  path,  is  set  equal  to  zero. 

If  performing  a  terrain  case  (fter  =  ‘.true.’),  perform  steps  1  through  8;  otherwise, 
the  SU  proceeds  to  step  9. 

1.  First,  all  terrain  range  points  are  checked  in  array  terx  to  ensure  they  are  steadily 
increasing.  If  they  are  not,  the  error  flag  ierror  is  set  equal  to  -17  and  the  SU  is  exited. 
Otherwise,  the  SU  proceeds  to  step  2. 

2.  Next,  a  test  is  made  to  detennine  whether  the  first  range  value  is  zero.  If  it  is  not,  the 
error  flag  ierror  is  set  equal  to  -18  and  the  SU  is  exited.  Otherwise,  the  SU  proceeds  to 
step  3. 

3.  Next,  a  test  is  made  to  determine  if  the  last  range  point  within  the  terrain  profile 
meets  or  exceeds  rmax.  If  the  logical  flag  lerr 6  is  ‘.true.’  and  if  the  condition  terx,  < 

ip 

rmax  is  met,  then  ierror  is  set  equal  to  -6  and  the  SU  is  exited;  otherwise,  the  SU 
proceeds  to  step  4. 

4.  A  check  is  now  made  to  determine  if  the  specified  terrain  range  points  are  spaced  at 
fixed  increments.  In  this  procedure,  three  variables,  rdif\,  rfmc,  and  rdifsum  are 
initialized  to  terx2-terx\,  zero,  and  rdif\,  respectively.  The  variable  rdif  is  the 
difference  between  adjacent  terrain  point  ranges.  The  variable  rfmc  is  the  ratio 
between  adjacent  terrain  point  differences.  The  variable  rdifsum  is  the  running  sum  of 
adjacent  terrain  point  differences.  The  final  value  for  rdifsum  and  maximum  ryrac  are 
determined  as 


dif2  =MAx(lO  3,  terxM  - terx ;]t  i  =  2,3,4 itp 
rdif 2 


rfmc  ~ 


rdif 

rdifsum  ~  rdifsum  +  rC^  f  >  ’ 


1 
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where  rdif\  is  set  equal  to  the  previous  value  of  rdifi  before  each  subsequent 
calculation  of  a  new  rdif  'i,  and  iymc  is  the  maximum  of  all  ratios  computed. 

5.  If  it  is  detennined  that  the  terrain  points  are  spaced  at  fixed  range  increments,  then  the 
range  spacing  rylx  is  set  to  this  increment.  Assuming  that  the  range  points  are  not 
equally  spaced,  rflx  is  initially  set  equal  to  zero.  If  the  value  of  rjrac  is  less  than  1.05, 
then  rylx  is  detennined  from 


^=nint| 


r  dif sum 

v  1>p~1  J 


6.  The  minimum  height  hminter  of  the  terrain  profile  is  now  found  and  the  entire  terrain 
profde  is  adjusted  by  hminter  such  that  this  is  the  new  zero  reference.  The  adjusted 
terrain  profile  is  stored  in  arrays  tx  and  ty  (i.e.,  ty  =  tery  -  hminter  for  all  elements  in 
tery)  .  Next,  the  maximum  height  htermax  of  the  terrain  is  also  obtained  from  tery.  If 
htermax  exceeds  hmax,  then  ierr0r  is  set  equal  to  -8  and  the  SU  is  exited.  Otherwise,  the 
SU  proceeds  with  step  7. 

7.  An  extra  point  is  added  to  the  arrays  tx  and  ty.  If  txt  is  less  than  rmax,  then  tx{  is  set 
equal  to  rmax  times  1.1.  The  input  index  itpa  is  the  number  of  terrain  points  used 
internally  in  arrays  tx  and  ty.  If  txt  is  greater  or  equal  to  rmax,  then  txi  is  set  equal  to 
tXi  times  1.1.  Finally,  the  array  element  ty{  is  set  equal  to  tyt  . 

8.  The  variable  antref  is  set  equal  to  ant  hi  plus  ty\.  Next,  the  array  of  terrain  slopes,  sip, 
and  the  maximum  tangent  ray  angle,  au,  from  the  source  to  the  terrain  peak  along  the 
profde  path  are  found  as  follows.  The  slope,  slpt,  for  each  /lh  terrain  segment  is  given 
by 


slpi  = 


tyl+\  -  tyi 


MAXl/.xvj  - tx= ,  1 0 


i  2^  i. 


tpa 


1. 


If  the  current  slope  is  greater  than  the  slope  tolerance  of  1 0‘5,  then  it  is  assumed  that 
the  terrain  profile  is  no  longer  flat  at  the  current  range  and  the  variable  rjiat  is  set  equal 
to  tXj.  Next,  if  the  value  of  A,  is  greater  than  antref,  then  the  maximum  tangent  angle 
au  from  the  source  to  each  terrain  point  is  calculated  as 


au  =  MAX 


TAN^1 


ftyx  -antref^ 
tx,- 


/  —  1,2, 3,...,itpa  1 


After  au  is  determined,  0.5°  is  added  to  its  value. 
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9.  Before  exiting,  the  minimum  height  hmref  relative  to  hllunler  is  found  from  the 
difference  between  the  minimum  specified  output  height  hmi„  and  hminter.  The 
maximum  height  limit  htum  relative  to  hminter  is  given  by  the  difference  between  hmax 
and  hminter ■  If  the  antenna  height  ant, -ef  is  greater  than  htnm,  the  error  code  ierror  is  set  to 

9 

Table  58  and  Table  59  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  TERINIT  SU  input  and  output  data  element. 


Table  58.  TERINIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

an  ti„ 

Transmitting  antenna  height  above  local  ground 

meters 

Calling  CSCI 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

hmax 

Maximum  output  height  with  respect  to  mean  sea  level 

meters 

Calling  CSCI 

hmin 

Minimum  output  height  with  respect  to  mean  sea  level 

meters 

Calling  CSCI 

Itp 

Number  of  height/range  points  in  profile 

N/A 

Calling  CSCI 

Ifpa 

Number  of  height/range  points  pairs  in  profile  tx,  ty 

N/A 

APMINIT  CSC 

lerr6 

User-provided  error  flag  that  will  trap  on  certain  errors  if  set 
to  ‘.true.’ 

N/A 

Calling  CSCI 

^ max 

Maximum  output  range 

meters 

Calling  CSCI 

terx 

Range  points  of  terrain  profile 

meters 

Calling  CSCI 

tery 

Height  points  of  terrain  profile 

meters 

Calling  CSCI 

Table  59.  TERINIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

au 

Maximum  tangent  ray  angle  from  the  source  to  the  terrain  peak  along  profile 
height 

radians 

d  /l  /  ycf 

Transmitting  antenna  height  relative  to  the  reference  height  hmjnter 

meters 

h 

'  •'mutter 

Minimum  height  of  terrain  profile 

meters 

hmref 

Height  relative  to  hmjnter 

meters 

h  1 1 i,n 

User-supplied  maximum  height  relative  to  hmin,er,  i.e.,  htum=hmax-hminter 

meters 

hterma 

X 

ierror 

Maximum  terrain  height  along  profile  path 

meters 

Integer  value  that  is  returned  if  errors  exist  in  input  data 

N/A 

rfix 

Fixed  range  increment  of  terrain  profile 

meters 

rflat 

Maximum  range  at  which  the  terrain  profile  remains  flat  from  the  source 

meters 

sip 

Slope  of  each  segment  of  terrain 

N/A 

tx 

Range  points  of  terrain  profile 

meters 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

ill 


Table  59.  TERINIT  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

h 

ri  ter  max 

Maximum  terrain  height  along  profile  path 

meters 

terror 

Integer  value  that  is  returned  if  errors  exist  in  input  data 

N/A 

rfix 

Fixed  range  increment  of  terrain  profile 

meters 

rflat 

Maximum  range  at  which  the  terrain  profile  remains  flat  from  the  source 

meters 

sip 

Slope  of  each  segment  of  terrain 

N/A 

tx 

Range  points  of  terrain  profile 

meters 

ty 

Adjusted  height  points  of  terrain  profile 

meters 

5.1.27  Trace  to  Output  Range  (TRACE_ROUT)  SU 

The  TRACE  ROUT  SU  traces  a  single  ray  whose  launch  angle  is  specified  by  the 
calling  routine  to  each  output  range.  The  height  of  this  ray  is  stored  at  each  output  range 
for  subsequent  proper  indexing  and  accessing  of  the  appropriate  sub-models. 

Upon  entering  the  SU,  four  in-line  ray  trace  functions  are  defined  for  general 
parameters  a,  b,  c,  and  g,d-  RADA1,  AP,  RP,  and  HP.  These  function  definitions  are 
identical  to  those  given  in  Section  5.1.15. 

Next,  the  propagation  angle,  range,  and  height  at  the  beginning  of  the  range  step, 
ao,  ho,  respectively,  are  initialized  to  as,  rs,  and  hs — the  angle,  range  and  height 
specified  by  the  calling  SU.  The  profile  index  j  is  also  initialized  to  js  from  the  calling 
SU.  The  index  jr  is  determined  such  that  rngoutJr  is  the  first  range  point  greater  than  ro. 
The  array  harray,  containing  the  heights  of  the  traced  ray  at  each  output  range,  is  then  set 
equal  to  0  for  elements  1  through  Perform  steps  1  through  2  for  each  output  range  step 
i  from  jr  to  nrout- 


1.  First,  harrayjr  is  set  equal  to  zero  and  the  variable  ro  is  set  equal  to  rngoutJr.  Next, 
perform  steps  l.a  through  l.d  until  r0  has  reached  ro  or  ho  has  reached  htiim. 

a.  First,  the  range,  r\,  at  the  end  of  the  ray  trace  segment  is  set  equal  to  ro.  Then  the 
current  gradient  grct  is  set  equal  to  grdumj.  The  angle,  a\,  at  the  end  of  the  ray  trace 
segment  is  found  from  AP(ao,  r\-r o). 

b.  If  a\  is  of  the  opposite  sign  as  ao,  then  a\  is  set  equal  to  zero  and  r\  is  given  by 
RP(r0,  a\-ao).  h\  is  then  given  by  HP(/?0,  a\,  ao). 
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c.  Now  the  value  of  h\  is  tested.  If  the  value  of  h\  is  greater  than  or  equal  to 
htdum/+i,  then  hi  is  set  equal  to  the  minimum  of  htnm  or  htdunij+ 1,  and  a\,  r\  and 
the  index  j  are  re-computed  as 

ax  =  ^RAD A 1  (a0,hx  -  h0 ) 

r\  =RP(ro»ai  ~ao) 
j  =  MIN  (lvlep,j  +  l). 


d.  If  A i  is  less  than  htdiwy+i  but  greater  than  htnm,  then  h\  is  set  equal  to  htnm  and  ti\ 
and  r\  are  re-computed  as  in  step  1  .c  above.  The  angle,  range  and  height  variables 
ao,  ro,  and  ho  are  now  set  equal  to  a\,  r\,  and  h\  in  preparation  for  the  next  step. 
Steps  l.a  through  l.d  are  repeated  until  ro  >  ro. 

2.  Once  ro  has  reached  ro,  harrayjt.  is  then  set  equal  to  ho.  The  index  jr  is  then 
incremented  by  1  and  steps  1  through  2  are  repeated  for  all  output  range  steps  or  until 
ho  has  reached  htnm. 

Finally,  if  the  traced  ray  has  reached  htum  at  a  range  before  rmax,  then  harray  is  set 
equal  to  htn,n  for  elements  from  jr  to  nrout,  with  the  index  //,,,«,  indicating  the  element  in 
harray  where  this  occurs,  set  equal  to  jr. 

Table  60  and  Table  61  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  TRACE  ROUT  SU  input  and  output  data  element. 


Table  60.  TRACE_ROUT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

as 

Propagation  angle  for  start  of  ray  trace 

radians 

Calling  SU 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum  and 
refdum 

M-units/ 

meter 

REFINTER  SU 
REFINIT  SU 

hs 

Height  for  start  of  ray  trace 

meters 

Calling  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINTER  SU 
REFINIT  SU 

htiim 

User-supplied  maximum  height  relative  to  hminler,  i.e.,  htum 
=h  -  h 

,lmax  minter 

meters 

TERINIT  SU 

js 

Refractive  profile  index  for  start  of  ray  trace 

N/A 

Calling  SU 

Ivlep 

Number  of  height/refractivity  levels  in  profile  htdum ,  refdum 

N/A 

REFINIT  SU 

MfOUt 

Number  of  output  height  points  desired 

N/A 

Calling  CSCI 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

rs 

Range  for  start  of  ray  trace 

meters 

Calling  SU 
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Table  61.  TRACE_ROUT  SU  output  data  element  requirements. 


Name 

Description 

Units 

harray 

Array  containing  heights  of  traced  ray  at  every  output  range 

meters 

l hmx 

index  in  harray  where  traced  height  has  reached  ht/im 

N/A 

5.1.28  Trace  to  next  Step  (TRACE_STEP)  SU 

This  SU  performs  one  ray  trace  step,  that,  given  a  starting  angle  (ao),  range  (ro), 
and  height  (ho),  will  trace  to  the  first  boundary  that  occurs  (refractivity  level  or  surface). 
It  then  passes  back  the  ending  angle,  range,  and  height  for  this  step  and  a  flag  indicating 
if  the  ray  has  hit  the  surface. 

Upon  entering  the  SU,  two  in-line  ray  trace  functions  are  defined  for  general 
parameters  a,  b,  c,  and  grci'.  RADA1,  AP,  HP,  and  RP.  These  function  definitions  are 
identical  to  those  in  Section  5.1.15. 

From  the  RGTRACE  SU,  the  range  r\  has  already  been  incremented  and  is  passed 
as  part  of  the  argument  list  to  this  SU.  If  the  r\  is  greater  than  the  next  range  point  in  the 
terrain  profile,  then  r\  is  set  equal  to  the  range  value  of  the  next  terrain  point. 

The  refractive  gradient  grci  within  the  current  range  step  is  initialized  to  grdurnj.  If 
the  gradient  is  less  than  10'6,  then  the  new  angle  ci\  is  set  equal  to  the  starting  angle  ao  and 
the  new  height  is  computed  as 


h\  =h0+(rl  -r0)TAN(a0). 


If  the  new  height  h\  is  greater  than  the  next  level  in  the  refractivity  profile,  then  li\  is  set 
equal  to  the  next  height  in  the  profile  and  r\  is  re-computed  as 


n  =>n 


!  (hX~K) 
TAN(a0)  ’ 


If  the  gradient  is  greater  than  10'6,  then  the  propagation  angle  a\  at  the  end  of  the 
range  step  is  computed  by  AP(a0,q-r0).  Next,  if  |  ao  I  is  less  than  10°,  then  if  ao  and  a\ 
differ  in  sign,  a\  is  set  equal  to  0  and  r\  is  computed  from  RP(  r0,  a\-ao  ).  The  height  of 
the  ray  at  the  end  of  the  range  step  is  next  computed  by  HP(  ho,  a\,  ao  ).  If  I  ao  I  is  greater 
than  10°,  then  a\  is  set  equal  to  ao  and  h\  is  computed  as 


K  =  K+(r\ 


-/■ojTANfo)- 


(fi  ~r0f  ' 

twoka 


where  twoka  is  determined  in  the  GET  K  SU. 
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Next,  the  HTCHECK  SU  is  referenced  to  determine  if  the  height  of  the  ray  has 
fallen  below  the  elevation  height  of  the  terrain  at  the  current  range  step,  and  if  so,  a  new 
a\,r\,  and  li\  are  returned. 

Next,  it  must  be  determined  if  the  ray  has  passed  through  a  refractive  layer,  in 
which  case  the  index  must  be  adjusted  and  the  range,  height,  and  angle  must  be  computed 
at  the  refractive  layer  transition.  For  an  upward  ray,  if  a\  is  positive  and  h\  has  reached  or 
surpassed  the  next  height  level,  then  a\,  r\,j,  and  h\,  are  found  as  follows.  First,  h\  is  set 
equal  to  htdimj+iJ  is  increment  by  1,  and  ci\  and  r\  are  given  by 

a^^RADA^ao,^  -h0) 
t\  =RP(r0,a1  ~a0). 

For  a  downgoing  ray,  if  a\  is  less  than  or  equal  to  0,  and  li\  is  less  than  htdwnp  then  h\  is 
set  equal  to  htdunij,  and  j  is  set  equal  to  the  maximum  of  0  or  /- 1 .  The  variables  ti\  and  r\ 
are  then  determined  from 


a,  =  -  RADA  l(a0 ,  /?,  -  h0 ) 
t\  =  RP(r0,  a,  -a0). 

Finally,  the  HTCHECK  SU  is  referenced  once  again  before  exiting  to  determine  if 
this  new  value  of  h\  has  fallen  below  the  height  of  the  current  terrain  elevation. 

Table  62  and  Table  63  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  TRACE  STEP  SU  input  and  output  data  element. 


Table  62.  TRACE_STEP  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

a0 

Propagation  angle  at  the  start  of  the  ray  trace  step 

radians 

Calling  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum  and 
refdum 

M-units/ 

meter 

REFINTER  SU 
REFINIT  SU 

ho 

Height  at  the  start  of  the  ray  trace  step 

meters 

Calling  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINTER  SU 
REFINIT  SU 

it 

Index  of  the  current  terrain  segment  in  arrays  tx  and  ty 

N/A 

Calling  SU 
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Table  62.  TRACE_STEP  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

ji 

Refractive  profile  index  at  the  start  of  the  ray  trace  step 

N/A 

Calling  SU 

r o 

Range  at  the  start  of  the  ray  trace  step 

meters 

Calling  SU 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

tx 

Range  points  of  terrain  profile 

meters 

TERINIT  SU 

ty 

Height  points  of  terrain  profile 

meters 

TER1NIT  SU 

Table  63.  TRACE_STEP  SU  output  data  element  requirements. 


Name 

Description 

Units 

Cl\ 

Propagation  angle  at  the  end  of  the  ray  trace  step 

radians 

grd 

Gradient  of  the  ray  trace  step 

M-units/meter 

Height  at  the  end  of  the  ray  trace  step 

meters 

terror 

Integer  value  that  is  returned  if  any  errors  exist  in  the  computation 

N/A 

ihit 

Integer  flag  indicating  if  ray  has  hit  surface: 
ihit  =  0;  ray  has  not  hit  the  surface 
ihit  =1;  ray  has  hit  the  surface 

N/A 

r  i 

Range  at  the  end  of  the  ray  trace  step 

meters 

5.1.29  Troposcatter  Initialization  (TROPOINIT)  SU 

The  TROPOINIT  SU  initializes  all  variables  and  arrays  needed  for  subsequent 
troposcatter  calculations.  The  tangent  range  and  tangent  angle  are  determined  from  the 
source  and  the  tangent  range  and  tangent  angles  are  determined  for  all  receiver  heights 
and  stored  in  arrays. 


Upon  entering  the  SU,  the  array  d\t  is  allocated  for  size  ipp  and  initialized  to  0. 
Next,  the  GET_K  SU  is  referenced  to  determine  the  effective  earth  radius  factor  aep  based 
on  a  ray  launched  at  the  critical  angle  traced  to  htum.  The  array  .90,  containing  angles  used 
in  determining  the  common  volume  scattering  angle  is  then  determined  from 


3Q  =™80Uti  ;  for  i  =  1,2,3,..., i 


lek 


A  constant  needed  in  the  troposcatter  calculation,  ry,  is  determined  from  0.0419 
times  the  frequency /mhz-  A  second  constant  needed  in  the  troposcatter  calculation,  rt\,  is 
found  from  iy  times  the  adjusted  transmitting  antenna  height  antrey. 
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Next,  the  tangent  angle  from  the  source,  i91s,  for  smooth  surface  is  computed  from 


*1,= 


yjtwoka 


*  ant 


ref 


lek 


The  variable  au  is  detennined  from 

a,d  =  20  LOG10  (f{ad )) 
ad  =  .91s  +  10“6 , 


where  aci  represents  the  lowest  direct  ray  angle  in  the  RO  region,  and  /(or</)  is  the  antenna 
pattern  factor,  obtained  from  referencing  the  ANTPAT  SU,  for  the  direct  angle. 

The  minimum  range,  77,0,  i,  at  which  the  diffraction  field  solutions  are  applicable 
and  the  intermediate  region  ends,  is  determined  for  smooth  surface  and  zero  receiver 
height.  The  variable  rhori  is  given  by 


rhor\  =  ^Jtwoka  *  antref  . 

Next,  the  tangent  ranges  and  angles  for  all  output  receiver  heights  are  computed 
and  stored  in  arrays  dls  and  92s,  respectively.  The  minimum  ranges  at  which  diffraction 
field  solutions  are  applicable  (for  smooth  surface)  for  all  output  receiver  heights  are 
determined  and  stored  in  array  rdt.  Height  differences  between  antref  and  each  output 
receiver  height  are  also  computed  and  stored  in  adif.  These  arrays  are  given  by 


d2si  =  J2a^zoufi, 
S2s,=-^L. 


rdt,  =  rhorX+dlsi 
adif,  =antref  -  zout„ 


i  0,1,2,...,  tizout 


where  the  computation  is  performed  for  each  7th  output  receiver  height  zout,-,  provided 
zouf  is  greater  than  or  equal  to  0,  and  i  ranges  from  1  to  n:ma. 


If fer  is  ‘.true.’,  then  the  tangent  angles  3\t  from  the  source  at  every  PE  range  is 
determined  as 


3lt_antref-tyhJ  |  jfrPE  ^ 
jArPE  twoka 


j  =  1,2,3,...,/ 


PE  * 
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The  index  counter  ja  (used  in  the  TROPOSCAT  SU)  is  initialized  to  1.  Finally,  the 
troposcatter  loss  term  tlstwr,  used  in  the  TROPOSCAT  SU  is  given  by 


tlstwr  -54.9+30  LOG , 0 {fMHz )  ald  . 

Table  64  and  Table  65  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  TROPOINIT  SU  input  and  output  data  element. 


Table  64.  TROPOINIT  SU  input  data  element  requirements 


Name 

Description 

Units 

Source 

dflt  ygj" 

Transmitting  antenna  height  relative  to  hminter 

meters 

TERINIT  SU 

J MHz 

Frequency 

MHz 

Calling  CSCI 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

ipe 

Number  of  PE  range  steps 

N/A 

PE1NIT  SU 

Mrout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

Mzout 

Integer  number  of  output  height  points  desired 

N/A 

Calling  CSCI 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

tyh 

Adjusted  height  points  of  terrain  profile  at  every  PE  range 
step 

meters 

PEINIT  SU 

zout 

Array  containing  all  desired  output  heights  referenced  to 
h 

' 1 minter 

meters 

APMINIT  CSC 

Table  65.  TROPOINIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

Clek 

Effective  earth  radius 

meters 

adif 

Height  differences  between  antref  and  all  output  receiver  heights 

meters 

d2s 

Array  of  tangent  ranges  for  all  output  receiver  heights  over  smooth  surface 

meters 

ek 

Effective  earth  radius  factor 

N/A 

l  error 

Integer  value  that  is  returned  if  any  errors  exist  in  the  computation 

N/A 

jt2 

Index  counter  for  tx  and  ty  arrays  indicating  location  of  receiver  range 

N/A 

V  hor\ 

Minimum  range  at  which  diffraction  field  solutions  are  applicable  and  the 
intermediate  region  ends,  for  smooth  surface  and  0  receiver  height. 

meters 

rdt 

Array  of  minimum  ranges  at  which  diffraction  field  solutions  are  applicable  (for 
smooth  surface)  for  all  output  receiver  heights. 

meters 

rf 

Constant  used  for  troposcatter  calculations 

meters'1 

rt\ 

rf  multiplied  by  antref 

N/A 
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Table  65.  TROPOINIT  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

90 

Array  of  angles  used  to  determine  common  volume  scattering  angle 

radians 

91s 

Tangent  angle  from  source  (for  smooth  surface) 

radians 

&lt 

Array  of  tangent  angles  from  source  height  -  used  with  terrain  profile 

radians 

92s 

Array  of  tangent  angles  from  all  output  receiver  heights  -  used  with  smooth 
surface 

radians 

tlstwr 

Troposcatter  loss  term  used  in  the  TROPOSCAT  SU 

dB 

twoka 

Twice  the  effective  earth  radius 

meters 

5.1.30  Starter  Field  Initialization  (XYINIT)  SU 

The  XYINIT  SU  calculates  the  complex  PE  solution  at  range  zero. 

Upon  entering  this  SU,  several  constant  terms  that  will  be  employed  over  the 
entire  PE  mesh  are  calculated.  The  PE  mesh  is  defined  by  the  number  of  points  in  the 
mesh,  Hfft,  and  by  the  mesh  size,  Ap.  The  constant  terms  include  (1)  the  angle  difference 
between  mesh  points  in  p-space  A9,  (2)  a  height-gain  value  at  the  source  (transmitter) 
antko,  and  (3)  the  normalization  factor  sgam  used  in  the  determination  of  the  complex 
array  containing  the  field  U.  The  normalization  factor  sgain  is  given  by 


s 


gain 


VI 

^  max 


The  height-gain  value  antkQ  at  the  source  (transmitter)  is  given  by 


antk0=k0antht , 

where  ant/lt  is  the  transmitting  antenna  height  above  the  local  ground  in  meters. 


The  complex  PE  solution  U  is  determined  from  the  antenna  pattern  factors, 
elevation  angle,  and  nonnalization  factor  according  to 


Uj  =  casgain 
Uj  =casgain 


f(ad  )< 
fM* 


-ip  .ant kQ 


-ipjantk0 


r(  \  ip  ;antk, 

-  f\~  ad)e 

\  ip  ;antkn 

+  f(-ad)ePj 


Hpol 
V  pol 
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where  pj  =  jA6  and  the  antenna  pattern  factors  /fa,/)  for  the  direct  path  and fi-af  for  the 

reflected  path  are  determined  by  referencing  the  ANTPAT  SU.  The  index  j  varies  from  0 
to  nfft. 


Next,  the  upper  %  of  the  field  is  filtered.  A  cosine-tapered  (Tukey)  filter  array  filt 
is  used  for  this  purpose.  The  filtered  PE  field  U  is  given  by 

Uj  =  fiItj_n34Uj ;  j  =  «34 ,  n34  + 1,  nM  +  2, n  fft . 

Finally,  the  DRST  SU  is  referenced  for  both  the  real  and  imaginary  components  to 
transfonn  the  complex  PE  field  to  z-space  before  exiting  the  SU. 

Table  66  and  Table  67  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  XYINIT  SU  input  and  output  data  element. 


Table  66.  XYINIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

CUltht 

Transmitting  antenna  height  above  local 
ground 

meters 

Calling  CSCI 

AO 

Angle  bin  width  (i.e.,  incremental 
sine(theta)) 

radians 

PEINIT  SU 

fiit 

Cosine-tapered  (Tukey)  filter  array 

N/A 

PEINIT  SU 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  SU 

ko 

Free-space  wave  number 

meters"1 

APMINIT  CSC 

A 

Wavelength 

meters 

APMINIT  CSC 

Injft 

Power  of  2  transform  size,  i.e.  nfff=2,nfft 

N/A 

FFTPAR  SU 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

tl34 

3/4  n  fft 

N/A 

APMINIT  CSC 

Zmax 

Total  height  of  the  FFT/PE  calculation 
domain 

meters 

FFTPAR  SU 

Table  67.  XYINIT  SU  Output  Data  Element  Requirements 


Name 

Description 

Units 

U 

Transform  of  complex  field 

pV/m 
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5.2  ADVANCED  PROPAGATION  MODEL  STEP  (APMSTEP)  CSC 


The  APMSTEP  SU  advances  the  entire  APM  CSCI  algorithm  one  output  range 
step,  referencing  various  SUs  to  calculate  the  propagation  loss  at  the  current  output  range. 

Upon  entering  the  APMSTEP  SU,  the  current  output  range  rout  is  updated,  the 
gaseous  absorption  loss,  gasioss  (in  dB),  and  all  mpfl  array  integer  indices  for  the  various 
calculation  regions  are  initialized.  The  propaf  array  is  also  initialized  to  a  value  of  -999. 
The  PESTEP  SU  is  then  referenced  to  determine  all  propagation  loss  values  within  the 
PE  calculation  region.  If  the  PE-only  option  is  specified  (PEjiag  =  ‘.true.’),  then  mpfl  is 
returned  with  integer  indices  jps  and  jpe,  corresponding  to  the  start  and  end,  respectively, 
of  propagation  factor  and  loss  values  within  mpfl.  Otherwise,  the  SU  proceeds  with  steps 
1  through  3. 

1.  If  APM  is  executing  under  the  airborne  mode  (hybrid  =  0),  then  the  starting  index  jas 
for  the  lower  angular  region  is  initialized  to  the  maximum  of  0  and  izg  plus  i0.  The 
ending  index  within  this  region  jae  is  determined  by  performing  an  iterative  search  to 
find  the  index  at  which  the  first  occurance  of  zoutj  is  greater  than  htfeistp.jae  is  then  set 

equal  to  the  index  j.  The  FEDR  SU  is  then  referenced  to  compute  the  loss  for  the 
lower  FE  region  for  the  direct  ray  only,  provided  jas  is  less  than  jae.  Upon  returning, 
j  start  is  then  set  equal  to  jas,jas  is  set  equal  to  jpe+ 1 ,  jae  is  set  equal  to  nzout,  and  the 
FEDR  SU  is  again  referenced  to  compute  the  loss  for  the  upper  FE  region.  The  SU 
then  proceeds  with  step  3. 

2.  If  APM  is  executing  under  the  full  hybrid  mode  (hybrid  =  1)  and  the  current  output 
range  is  less  than  the  range  at  which  the  XO  region  begins  (rout  <  rtst),  the  steps  2. a 
and  2.b  are  performed. 

a.  The  starting  and  ending  mpfl  array  indices  for  FE  calculations,  jjs  and  jje, 
respectively,  are  detennined.  For  ranges  less  than  2.5  km,  jfs  is  set  equal  to  the 
maximum  of  0  and  izg  plus  i0,  and  j/e  is  set  equal  to  n:out .  For  ranges  greater  than 
2.5  km,  jfs  is  set  equal  to  the  maximum  of  jpe+ 1,  or  j+ 1 ,  where  j  is  the  first 
occurance  of  zoutj  that  is  greater  than  htfeistp  (the  output  height  index  that 

corresponds  to  the  height  just  above  the  FE  5°  angle  limit).  The  ending  index  jfe  is 
set  equal  to  n-oul.  The  FEM  SU  is  then  referenced  and  propagation  factor  and  loss 
values  within  the  FE  region  are  computed  and  returned  in  mpfl. 

b.  If  the  current  output  range  is  greater  than  2.5  km,  then  the  starting  and  ending 
mpfl  array  indices  for  RO  calculations,  jrs  and  jre,  respectively,  are  detennined. 
These  indices  are  based  on  the  values  of  jps,jpe,jfs,  and  jfe  such  that  at  every  range 
step,  jrs  will  always  be  greater  than  the  ending  index  of  the  PE  region  (jpe)  and  jre 
will  be  less  than  the  starting  index  of  the  FE  region  (jfs ).  The  ROLOSS  SU  is  then 
referenced  and  propagation  factor  and  loss  values  within  the  RO  region  are 
computed  and  returned  in  mpfl. 
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3.  Once  the  various  propagation  factor  and  loss  within  the  various  regions  have  been 
calculated,  the  ending  index  jend  of  valid  values  within  mpfl  is  given  by  the  maximum 

of  jpeijfeijrei  Cl n d  /  ae • 

Upon  exiting,  if  the  final  output  range  step  has  been  reached,  the  integer  counter 
ja,  associated  with  troposcatter  calculations,  is  initialized  to  1 . 

Table  68  and  Table  69  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  APMSTEP  SU  input  and  output  data  element. 


Table  68.  APMSTEP  CSC  input  data  element  requirements. 


Name 

Description 

Units 

Source 

gaSat, 

Gaseous  absorption  attenuation  rate 

dB/km 

GASABS  SU 

htfe 

Array  containing  the  height  at  each  output  range  separating 
the  FE  region  from  the  RO  region  (full  hybrid  mode),  or  the 

FE  region  from  the  PE  region  (partial  hybrid  mode) 

meters 

FILLHT  SU 

htlim 

Maximum  height  relative  to  hminter 

meters 

TERINIT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  FEDR  +  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

io 

Starting  index  for  mpfl  array: 

0  =  1st  calculated  output  point  is  at  surface 

1  =  1st  calculated  output  point  is  at  height  Azout 

N/A 

APMINIT  CSC 

l sip 

Current  output  range  step  index 

N/A 

Calling  CSCI 

Izg 

Number  of  output  height  points  corresponding  to  local 
ground  height  at  current  output  range  rout 

N/A 

CALCLOS  SU 

nopE 

Integer  flag  indicating  if  PE  calculations  are  needed: 

0  =  PE  calculations  needed 

1  =  no  PE  calculations  needed 

N/A 

GETTHMAX  SU 

nrout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

nzout 

Integer  number  of  output  height  points  desired 

N/A 

Calling  CSCI 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

N/A 

Calling  CSCI 

r atz 

Range  at  which  zUm  is  reached  (used  for  hybrid  model) 

meters 

APMINIT  CSC 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

r pest 

Range  at  which  loss  values  from  the  PE  model  will  start 
being  calculated 

meters 

GETTHMAX  SU 

1'tst 

Range  at  which  to  begin  RO  calculations  (equal  to  2.5  km) 

meters 

APMMOD 

zout 

Array  containing  all  desired  output  heights  referenced  to 
hminter 

meters 

APMINIT  CSC 
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Table  69.  APMSTEP  CSC  output  data  element  requirements. 


Name 

Description 

Units 

J end 

Index  at  which  valid  loss  values  in  mpfl  end 

N/A 

J  start 

Index  at  which  valid  loss  values  in  mpfl  start 

N/A 

£ClSioss 

Gaseous  absorption  loss  at  range  rout 

dB 

jt2 

Index  counter  for  tx  and  ty  arrays  indicating  location  of  receiver  range 

N/A 

mpfl 

Propagation  factor  and  loss  array 

cB 

mpflrtg 

Propagation  loss  and  factor  at  receiver  heights  specified  in  the  zout  rtg 
array 

cB 

V out 

Current  desired  output  range 

meters 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for 
the  direct  and  reflected  rays  (where  applicable)  for  all  output  height/range 
points 

radians, 

dB 

5.2.1  Calculate  Propagation  Loss  (CALCLOS  SU) 

The  CALCLOS  SU  determines  the  propagation  factor  and  loss  from  the  PE  region 
at  each  output  height  point  at  the  current  output  range. 

Upon  entering  the  SU,  several  variables  are  initialized.  The  output  range,  rout,  is 
updated  based  on  the  current  range  step  istp.  The  height  of  the  terrain  at  the  current  and 
last  ranges,  yc.h  and  v//„  respectively,  are  determined  relative  to  the  reference  height,  hmref- 

Next,  the  interpolated  ground  height,  zint,  at  the  current  output  range  and  the 
number  of  vertical  output  points,  izg,  that  correspond  to  this  ground  height  are  determined. 
First,  the  interpolated  ground  height  is  given  by 


Z  ini 


=yiast  +  hour  -yias,)XX 


where  the  parameter  xx  is  given  in  terms  of  the  PE  range  step  A/77;  by 


xx  = 


A  r, 


PE 


Having  detennined  zint ,  izg  is  then  computed  from 


4g=INT| 


Zint  -  hmnf 
V  out  J 
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where  A zout  is  the  output  height  increment.  Next,  all  elements  in  array  mpfl  from  1  to  izg 
are  set  to  zero,  and  the  index  jstart,  representing  beginning  valid  loss  values  in  the  mpfl 
array,  is  set  to  the  maximum  of  0  or  izg,  plus  i0. 

If  hybrid  =  0,  then  the  maximum  tangent  angle  ater  from  the  antenna  height  to  the 
terrain  height  at  the  current  range  is  determined  from 


ater  =  MAX 


TAN'1 


zint  ~antref - — 

twoka 


down 


>at, 


where  ater  in  the  argument  above  is  the  maximum  angle  computed  from  previous 
references  to  the  CALCLOS  SU. 

If  the  current  output  range  is  greater  than  the  range  rpest  at  which  PE  solutions  are 
valid,  then  the  calculation  of  loss  values  is  begun.  If  this  condition  is  not  satisfied,  then 
the  mpfl  array  is  set  to  -32767  for  values  of  the  array  index  from  jstart  up  to  and  including 
the  number  of  output  height  points  desired  (n:ow),  jend  is  set  equal  to  jstart  and  the  SU  is 
exited. 


Once  it  is  determined  that  loss  calculations  will  be  perfonned,  several  parameters 
are  computed.  Both  parameters  ip\  and  ip 2  are  first  set  to  0.  If  the  logical  variable  fter  is 
‘.true.’,  then  a  terrain  case  is  being  performed.  The  two  indices  ip\  and  ip 2  are  given  by 


ipi=  MAX 


0,INTt 


yih 

Az 


out 


x 

) 


ip  2=MAX 


0,INT< 


ych 

A 


x 

) 


These  indices  indicate  the  first  output  height  point  in  array  zout,  where  propagation  loss 
will  be  computed  at  the  last  and  current  PE  ranges.  Next,  the  output  heights  zoutipl  and 

zoutip2,  relative  to  yw  and  ycur,  respectively,  are  checked  to  make  sure  they  are  positive.  If 

not,  the  two  indices  ip\  and  ip 2  are  incremented  by  a  value  of  1.  For  values  of  the  array 
index  from  0  up  to  ip  1,  the  array  of  propagation  factors  rfacl  at  valid  height  points  for 
range  riast  are  set  to  0.  For  values  of  the  array  index  from  0  up  to  ip 2,  the  array  of 
propagation  factors  rfacl  at  valid  height  points  for  range  rout  are  also  set  0. 
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If  j start  is  less  than  ip\  and  ip 2,  then  the  variable  izg  is  recomputed  as 


hg  =  MAX(/Zg ,  MIN(//;I ,  ip2  )) 


and  the  mpfl  array  at  index  izg  is  set  equal  to  -32766.  jstart  is  then  recomputed  as  the 
maximum  of  0  and  izg,  and  the  value  of  i0  is  then  added  to  jstart- 

Next,  the  height/integer  value,  jend,  indicating  the  end  of  valid  loss  values,  is 
determined  as 


Jend  =  MAX 


jend=  MAX 


0,INT 


0,INTt 


Zlim  -  hmref 


Az 


out  J 


if  PE  /lag  is  '.true.' ,  otherwise 


MIN 


zu,n ,MAx(zw,Wwii  \hmref 


Az„ 


where  istp  is  the  current  output  range  step,  and  hlinij  ^  is  the  height  at  the  current  output 
range  step  separating  the  PE  region  from  the  FE,  RO,  or  XO  regions.  Finally,  jend  is  given 
by  the  minimum  of  jend  (as  computed  above)  and  nzuul. 

If  clutter  calculations  are  to  be  perfonned  (C/,„  =  ‘.true.),  the  propagation  factor  at 
1  m  above  the  surface  is  computed  by  referencing  the  FN  GETPFAC  function.  The 
propagation  factor  at  1-m  height  is  computed  from  the  complex  PE  field  at  the  range  step 
immediately  before  and  after  the  current  output  range  step  by 

rfl  =  FN_GETPFAC  (u/ast,  rIoglst ,  A zPE ,  1  .o) , 

7/2  =  FNGETPFAC(6,  rlog ,  A zPE ,  l.o). 


The  propagation  factor  is  then  interpolated  in  range  to  the  current  output  range  step  by 
referencing  the  FN_PLINT  function: 


Fat\mitp  =FN_PLINT(//1,  rf2,xx). 

Next,  if  the  value  of  jend  is  less  than  jstart  the  mpfl  array  for  indices  from  jend+ 1  to 
nzout  are  set  equal  to  -32767  and  the  SU  is  exited.  Otherwise,  the  propagation  loss  values 
are  determined  from  the  propagation  factors  rfac  1 ,  and  rfacl,  and  from  the  parameter  xx 
defined  earlier  in  this  section. 
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If  >' legist  ( 1 0  LOG(rte) )  is  greater  than  zero  (it  is  initialized  to  0  for  istp=  1 ),  then  the 
FN  GETPFAC  function  is  referenced  to  detennine  the  propagation  factor  rfiac  1  „  which  is 
given  by 

tfacl,  =  F  N_G  E  T  P  F  A c{ui 'ast,  rloglst ,  A zPE ,  zouti  -  ylast ),  i  =  ipl,  ipX  +  1, jend , 

where  Ulast  is  the  complex  field  array  at  the  previous  PE  range.  Next,  the  propagation 
factor  rfac2j  is  given  by 

rfac 2,  =  FN  GETPFAC(f/ ,  rlog ,  A zPE ,  zouti  -  ycur ),  i  =  ip2 ,  ip2  +  1, jend , 

where  U  is  the  complex  field  array  at  the  current  PE  range,  and  r/og  is  lOLOG(r) . 


Next,  if  a  frequency  is  specified  greater  than  50  MHz  (. HFjiag  =  ‘.false.’)  and  if 
using  the  partial  hybrid  mode  (PE  &  XO  models),  heights  corresponding  to  areas  outside 
the  valid  PE  calculation  region  are  determined  and  propagation  loss  is  set  equal  to  -32767 
within  mpfl  for  those  heights.  If  using  the  full  or  partial  hybrid  modes,  the  propagation 
factor  at  the  last  PE  height  point  is  determined  at  the  previous  and  current  PE  ranges. 
Linear  interpolation  is  then  performed  to  compute  the  propagation  loss  at  range  rout  and 
height  z/im.  The  loss  and  height  are  then  stored  in  array  ffrout  for  subsequent  interpolation 
in  the  EXTO  SU. 

Next,  the  propagation  factor  and  loss  at  range  rout  is  found  by  interpolating 
between  the  current  and  previous  PE  ranges.  The  propagation  factor  in  dB,  and  the 
propagation  loss  at  range  rout  is  given  by 


FdB  =FN_PLINr^V/acl;.  ,rfac2i,xx) 
rlossi=fsl.p-FdB 


i  j start?  j start  ^  1  ?  •  •  •  ?  j end 


where  fsh  is  the  free-space  loss  in  dB  at  range  rout. 

Next,  if  the  propagation  factor  and  propagation  angle  and  are  to  be  computed 
{lang  =  ‘.true.’),  the  angle  infonnation  is  stored  in  array  propaf  by  interpolating  in  height 
using  the  values  stored  in  ptr  at  the  current  range  step.  The  propagation  angle  at  the 
current  range  step  is  detennined  by 


zoutk-zint 
^  tsz  ’ 

spec 

izsp  =  INT  (zf\ 
fir  =  zf  -izsp, 

propaf  j  =  F N_ P L I N T [ptrrsp  i^ ,  ptri:sp+l^  ,  fir}  k  =  jstart ,  jstart  +  1,...,  jend , 

where  Azspec  is  the  height  increment  at  which  the  propagation  angles  were  spectral 
estimated. 
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If  the  loss  at  a  receiver  height  relative  to  the  local  ground  height  is  to  be  computed 
(i Irtg  =  ‘.true.’),  then  the  propagation  loss  at  each  height  specified  in  array  zout_rtg  is 
computed  by  subsequent  references  to  the  FN  GETPFAC  function  using  the  field 
strength  arrays  at  the  previous  and  next  PE  range  steps.  The  final  propagation  loss  is  then 
interpolated  by  referencing  the  FN_PLINT  function  and  stored  in  array  rloss_rtg. 

If  the  troposcatter  calculation  flag  Tropo  is  ‘.true.’  and  the  transmitter  height  is  less 
than  100  m,  then  the  TROPOSCAT  SU  is  referenced  to  compute  troposcatter  loss  from 
height  zoutjstan  to  zoutjend ,  and  this  is  added,  if  necessary,  to  rloss. 


The  gaseous  absorption  loss  gasioss  is  next  added  to  rloss  and  the  loss  and 
propagation  factor  in  centibels  is  given  by 

mpfll  t  =  NINT(l  0  *  rloss t ) 

mpfl2  l  =  NINt(|  0  *  (fslix//i  -  rloss J’  l~^tarU^tar&X'  '■■’J'end 


with  the  remaining  elements  in  mpfl  set  equal  to  -32767  (i.e.,  mpfl/--32767  for  k=  j(,nci+ 1 

to  Ilzout)- 

Finally,  if  lang  and  Irtg  are  ‘.true.’,  then  the  complete  propagation  factor  is 
computed  from  mpfl  and  rloss  rtg  and  stored  in  arrays  propaf  and  mpfl  rtg,  respectively, 
before  exiting. 

Table  70  and  Table  71  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  CALCLOS  SU  input  and  output  data  element. 


Table  70.  CALCLOS  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ClYlt ref 

Transmitting  antenna  height  relative  to  the 
reference  height  hminter 

meters 

TERINIT  SU 

CM 

Logical  flag  used  to  indicate  if  surface  clutter 
calculations  are  desired. 

logical 

Calling  CSC1 

ArpE 

PE  range  step 

meters 

PEIN1T  SU 

Azoul 

Output  height  increment 

meters 

APMINIT  CSC 

AzPE 

PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

FFTPAR  SU 

/\y_ 

t-^spec 

Height  increment  at  which  the  propagation  angles 
are  computed  from  spectral  estimation 

meters 

GET  ANGLES  SU 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

APMINIT  CSC 
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Table  70.  CALCLOS  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

§  CIS  loss 

Gaseous  absorption  loss  at  range  rout 

dB 

APMSTEP  CSC 

HFflag 

HF  computation  flag  indicating  the  frequency 
specified  is  less  than  50  MHz 

N/A 

APMINIT  CSC 

hlirn 

Array  containing  height  at  each  output  range 
separating  the  RO  region  from  the  PE  (at  close 
ranges)  and  XO  (at  far  ranges)  regions 

meters 

GETTHMAX  SU 

h 

•  •'minter 

Minimum  height  of  terrain  profile 

meters 

TERINIT  SU 

hmref 

Height  relative  to  hrninter 

meters 

TERINIT  SU 

htfe 

Array  containing  the  height  at  each  output  range 
separating  the  FE  region  from  the  RO  region  (full 
hybrid  mode),  or  the  FE  region  from  the  PE 
region  (partial  hybrid  mode) 

meters 

FILLHT  SU 

l\imx 

Index  in  harray  where  traced  height  has  reached 

h  tjjm 

N/A 

TRACE  ROUT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  pure  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

i0 

Starting  index  for  mpfl  array: 

0  =  1st  calculated  output  point  is  at  surface 

1  =  1st  calculated  output  point  is  at  height 

AZout 

N/A 

APMINIT  CSC 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

Ixo 

Number  of  range  steps  in  XO  calculation  region 

N/A 

APMINIT  CSC 

lang 

Logical  flag  indicating  if  propagation  angle  and 
propagation  factor  output  is  desired. 

N/A 

Calling  CSCI 

Irtg 

Logical  flag  indicating  if  loss  relative  to  the  local 
ground  height  needs  to  be  computed. 

‘.true.’  =  Compute  loss  relative  to  ground  at 
heights  specified  by  array  zout  rtg. 

‘.false.’  =  Do  not  compute  loss. 

N/A 

APMINIT  CSC 

Wang 

Number  of  points  in  the  vertical  at  which  to 
spectrally  estimate  propagation  angles. 

N/A 

GET  ANGLES  SU 

Mzout 

Integer  number  of  output  height  points  desired 

N/A 

Calling  CSCI 

Mzout_rtg 

Number  of  height  output  points  for  receiver 
heights  relative  to  the  local  ground  elevation. 

N/A 

Calling  CSCI 

PE  flag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

N/A 

Calling  CSCI 

T atz 

Range  at  which  z;im  is  reached  (used  for  hybrid 
model) 

meters 

APMINIT  CSC 
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Table  70.  CALCLOS  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

F last 

Previous  PE  range 

meters 

Calling  SU 

rlog 

10  log(  PE  range  r ) 

N/A 

PESTEP  SU 

1' Ioglst 

10  log(  previous  PE  range  riast) 

N/A 

PESTEP  SU 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

pest 

Range  at  which  PE  loss  values  will  start  being 
calculated 

meters 

GETTHMAX  SU 

T 

1  ropo 

Troposcatter  calculation  flag: 

‘. false. ’=  no  troposcatter  calcs 
‘.true.’  =  troposcatter  calcs 

N/A 

Calling  CSCI 

twokcidown 

Twice  the  effective  earth  radius  for  downward  path 

meters 

GETK  SU 

U 

Complex  field  at  current  PE  range  r 

pV/m 

PESTEP  SU 

Ulast 

Complex  field  at  previous  PE  range  i'imt 

pV/m 

PESTEP  SU 

y cur 

Height  of  ground  at  current  range  r 

meters 

PESTEP  SU 

yiast 

Height  of  ground  at  previous  range  riast 

meters 

PESTEP  SU 

zlim 

Height  limit  for  PE  calculation  region 

meters 

GETTHMAX  SU 

zout 

Array  containing  all  desired  output  heights 
referenced  to  hminter 

meters 

APMINIT  CSC 

zoutrtg 

Dynamically  allocated  array  of  receiver  heights 
specified  relative  to  the  local  ground  height. 

meters 

Callng  CSCI 

Table  71 .  CALCLOS  SU  output  data  element  requirements. 


Name 

Description 

Units 

&ter 

Tangent  angle  from  antenna  height  to  terrain  height  at  current  range 

radians 

Fatlm 

Propagation  factor  computed  at  1  m  above  the  surface. 

dB 

ffrout 

Array  of  propagation  factors  at  each  output  range  beyond  rat:  and  at  height 

Zlim 

dB 

lZg 

Number  of  output  height  points  corresponding  to  local  ground  height  at 
current  output  range  rout 

N/A 

J  end 

Index  at  which  valid  loss  values  in  mpfl  end 

N/A 

J start 

Index  at  which  valid  loss  values  in  mpfl  begin 

N/A 

mpfl 

Two-dimensional  propagation  factor  and  loss  array 

cB 

mpflrtg 

Propagation  loss  and  factor  at  receiver  heights  specified  in  the  zout  rtg 
array 

cB 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for 
the  direct  and  reflected  rays  (where  applicable)  for  all  output  height/range 
points 

radians, d 

B 

rfacl 

Propagation  factor  at  valid  output  height  points  from  PE  field  at  range  rjast. 

dB 

rfac2 

Propagation  factor  at  valid  output  height  points  from  PE  field  at  range  r 

dB 
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Table  71.  CALCLOS  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

rloss 

Propagation  loss 

dB 

rlossrtg 

Propagation  loss  determined  at  receiver  heights  specified  in  array  zout  rtg 

dB 

zxo 

Height  of  the  ground  at  the  current  output  range  step 

meters 

5.2.2  Current  Wind  (FN_CURWIND)  Function 

The  FNCURWIND  function  perfonns  a  linear  interpolation  in  range  to  get  the 
current  wind  speed  at  the  specified  range. 

Upon  entry,  the  current  wind  speed,  cos,  is  initialized  to  the  the  final  wind  speed 
specified  in  array  wind.  If  the  number  of  wind  speeds  specified  is  greater  than  1  then  the 
index,  k,  within  the  array  rngwind  is  determined  such  that  the  current  range,  r,  satisfies 
rngwind k  <  r  <  rngwindk+i.  The  wind  speed  at  range  r  is  then  determined  from  linear 
interpolation: 


(os  =  wind k+ (wind k+l  -  wind k) 


r  -  rngwind k 


rngwind k+l  -  rngwind 


k  J 


and  returned  to  the  calling  SU. 

Table  72  and  Table  73  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  CURWIND  function  input  and  output  data 
element. 


Table  72.  FN_CURWIND  function  input  data  element  requirements. 


Name 

Description 

Units 

Source 

nw 

Number  of  wind  speeds 

N/A 

Calling  CSCI 

r 

Current  range 

meters 

Calling  SU 

rngwind 

Ranges  of  wind  speeds  entered:  rngwind ,  =  range  of 
ith  wind  speed 

meters 

Calling  CSCI 

wind 

Dynamically  allocated  array  of  wind  speeds. 

meters/ 

second 

Calling  CSCI 

Table  73.  FN_CURWIND  function  output  data  element  requirements. 


Name 

Description 

Units 

0)s 

Interpolated  wind  speed 

meters/second 
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5.2.3  Dielectric  Constant  (FNDIECON)  Function 

The  FN  DIECON  function  extracts  the  complex  dielectric  constant  at  the  current 

range. 


Upon  entering  the  function,  the  index,  k,  within  the  array  rgrnd  is  determined 
such  that  the  current  range,  r,  satisfies  rgrnd *  <  r  <  rgrnd *+i.  The  complex  dielectric 
constant  is  then  returned  according  to  diec  =  nc2 and  the  function  is  exited. 

Table  74  and  Table  75  provide  identification,  description,  units  of 
measure,  and  the  computational  source  for  each  FN  DIECON  function  input  and  output 
data  element. 


Table  74.  FN_DIECON  function  input  data  element  requirements. 


Name 

Description 

Units 

Source 

lgr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 

DIEINIT  SU 

r 

Current  range 

meters 

Calling  SU 

rgrnd 

Array  containing  ranges  at  which  varying  ground 
types  apply. 

meters 

Calling  CSCI 

Table  75.  FN_DIECON  function  output  data  element  requirements. 


Name 

Description 

Units 

diec 

Complex  dielectric  constant  at  range  r 

N/A 

5.2.4  DOSHIFT  SU 

The  DOSHIFT  SU  shifts  the  field  by  the  number  of  bins,  or  PE  mesh  heights 
corresponding  to  the  local  ground  height. 

Upon  entry,  the  number  of  bins  to  be  shifted  is  detennined.  First,  the  difference 
Vdiff  between  the  height  of  the  ground  yiast  at  the  previous  range  and  that  at  the  current  PE 
range  ycur  is  determined  from 


yw  =  yc 


y/a. 
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The  number  of  bins  to  be  shifted,  kinn,  is  found  from 


f 

Kn= nint 

v 


A 


A Zr 


The  PE  solution  U  is  then  shifted  downward  if  the  local  ground  is  currently  at  a  positive 
slope  ( Ydiff>  0),  upward  if  the  local  ground  is  at  a  negative  slope  ( Vdiff<  0),  and  otherwise 
not  shifted.  When  the  PE  solution  has  been  shifted  down,  the  value  of  the  PE  solution  U 
for  the  upper  kbin  elements  are  set  to  zero.  Likewise,  when  the  PE  solution  has  been 
shifted  upwards,  the  lower  kbin  elements  are  set  to  zero. 


Table  76  and  Table  77  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  DOSHIFT  SET  input  and  output  data  element. 


Table  76.  DOSHIFT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

AZpe 

PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

FFTPAR  SU 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

ft-ml 

nffl-l 

N/A 

PEINIT  SU 

u 

Complex  field  at  range  r 

pV/m 

PESTEP  SU 

y cur 

Height  of  ground  at  current  range  r 

meters 

PESTEP  SU 

yiast 

Height  of  ground  at  previous  range  riast 

meters 

PESTEP  SU 

Table  77.  DOSHIFT  SU  output  data  element  requirements. 


Name 

Description 

Units 

U 

Complex  field  at  range  r 

pWm 

5.2.5  Discrete  Sine/Cosine  Fast-Fourier  Transform  (DRST)  SU 

A  function  with  a  common  period,  such  as  a  solution  to  the  wave  equation,  may 
be  represented  by  a  series  consisting  of  sines  and  cosines.  This  representation  is  known  as 
a  Fourier  series.  An  analytical  transformation  of  the  function,  known  as  a  Fourier 
transfonn,  may  be  used  to  obtain  a  solution  for  the  function. 

The  solution  to  the  PE  approximation  to  Maxwell's  wave  equation  is  obtained  by 
using  such  a  Fourier  transformation  function.  The  APM  CSCI  uses  only  the  real-valued 
sine  or  cosine  transformation  in  which  the  real  and  imaginary  parts  of  the  PE  equation  are 
transfonned  separately.  Which  transform  is  performed  is  dependent  on  the  value  of  an 


132 


integer  flag  provided  by  the  calling  SU.  The  Fourier  transformation  provided  with  the 
APM  CSCI  is  described  by  Bergland  (1969)  and  Cooley  (1970). 

Other  sine/cosine  fast  Fourier  transform  (FFT)  routines  are  available  in  the 
commercial  market,  and  such  a  sine/cosine  FFT  may  already  be  available  within  another 
calling  CSCI.  The  selection  of  which  FFT  ultimately  used  by  the  APM  CSCI  is  left  to  the 
application  designer  as  every  sine/cosine  FFT  will  have  hardware  and/or  software 
performance  impacts.  For  this  reason,  it  is  beyond  the  scope  of  this  document  to  describe 
the  numerical  implementation  of  the  FFT  algorithm. 

Table  78  and  Table  79  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  DRST  SU  input  and  output  data  element. 


Table  78.  DRST  input  data  element  requirements. 


Name 

Description 

Units 

Source 

iflag 

Flag  to  indicate  which  transform  to  perform 

0  =  cosine  transform 

1  =  sine  transform 

-1  =  deallocates  all  allocated  arrays 

N/A 

Calling  SU 

Injft 

Power  of  2  transform  size,  i.e.  njff=  2lnffl 

N/A 

FFTPAR  SU 

X 

"ffi 

Field  array  to  be  transformed  -  dimensioned  2  JJ  in  calling  SU 

pV/m 

Calling  SU 

Table  79.  DRST  output  data  element  requirements. 


Name 

Description 

Units 

X 

Transform  of  field 

pV/m 

5.2.6  Flat-Earth  Direct  Ray  (FEDR)  SU 

The  FEDR  SU  determines  the  propagation  factor  and  loss  based  on  FE 
calculations,  for  the  direct  ray  path  only,  for  regions  above  and  below  the  PE  maximum 
propagation  angle. 

Upon  entering  the  SU  the  square  of  the  current  range,  rsq,  is  initialized  to  rsqrdj  . 

Next,  the  earth  curvature  height  correction  factor  rsqk  is  initialized  according  to  the 
calculation  region: 


r  k  =  — S^~  >  above  PE  region 
twoka 

r 

r,  = - — - ;  below  PE  region. 

*  noofci*™ 
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Steps  1  through  2  are  performed  for  all  heights  within  array  zoutma  with  index  j 
varying  from  jas  to  jae. 

1.  First,  the  direct  ray  angle  is  computed  as 


<2  =  TAN*1 


r  zoutma  j  -  rsqk^ 


'out  J 


2.  Next,  if  the  direct  ray  a  is  greater  than  the  tangent  angle  ater  produced  from  the 
antenna  height  to  the  current  terrain  height,  or  the  calculations  are  for  the  upper  PE 
region,  then  steps  2. a  through  2.e  are  perfonned. 

a.  The  ANTPAT  SU  is  referenced  to  obtain  the  antenna  pattern  factor /(a)  for  the 
direct  ray. 

b.  The  path  length  of  the  direct  ray  is  then  computed: 


rx  = 


+  K 


sq 


c.  The  propagation  factor  (FdB)  and  loss  (L)  are  then  computed  from 

L  =  20  LOG10  (rx )  +  plcnst  -  20  LOG10  (mA x(/(«),  1 0*13 ))+  rxgasatt 
F<ib  =  20  LOG10  (rx )  +  plcnst  -  L . 

Note  that  Fcib  above  is  actually  20  times  the  logarithm  of  the  propagation  factor  F 
as  defined  in  most  text  books. 

d.  Next,  L  and  FdB  are  multiplied  by  10  and  rounded  to  the  nearest  integer,  then 
stored  in  array  mpfl. 

e.  If  the  propagation  factor  and  angle  are  to  be  output  (/m?g=‘.true.’),  then  Fcm  and  a 
are  stored  in  array  propaf 

Once  the  loss  has  been  computed  for  all  heights,  the  final  step  is  to  compute  the 
propagation  factor  at  1  m  above  the  surface  if  clutter  computations  are  to  be  performed 
{Ciut  =  ‘.true.’).  The  SU  is  then  exited.  Table  80  and  Table  81  provide  identification, 
description,  units  of  measure,  and  the  computational  source  for  each  FEDR  SU  input  and 
output  data  element. 


134 


Table  80.  FEDR  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

(%ter 

Tangent  angle  from  antenna  height  to  terrain  height  at 
current  range 

radians 

CALCLOS  SU 

Cffl-t ref 

Transmitting  antenna  height  relative  to  the  reference 
height  hfninter 

meters 

TERINIT  SU 

Clut 

Logical  flag  used  to  indicate  if  surface  clutter 
calculations  are  desired. 

N/A 

Calling  CSCI 

gasatt 

Gaseous  absorption  attenuation  rate 

dB/km 

GASABS  SU 

Iflag 

Flag  indicating  which  portion  of  the  FE  region  is  being 
computed. 

0  =  loss  is  computed  for  heights  above  PE  region 

1  =  loss  is  computed  for  heights  below  PE  region 

N/A 

Calling  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  CSCI 

J  ae 

Ending  index  within  mpfl  of  FE  loss  values 

N/A 

Calling  SU 

Jas 

Starting  index  within  mpfl  of  FE  loss  values 

N/A 

Calling  SU 

lang 

Logical  flag  indicating  if  propagation  angle  and 
propagation  factor  output  is  desired. 

N/A 

Calling  CSCI 

T out 

Current  output  range 

meters 

Calling  SU 

Pietist 

Constant  used  in  determining  propagation  loss  {plcnst = 

20  logioUU)) 

dB/m 

APMINIT  CSC 

rsqrd 

Array  containing  the  square  of  all  desired  output  ranges 

meters2 

APMINIT  CSC 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

tWokddown 

Twice  the  effective  earth  radius  for  downward  path 

meters 

GETK  SU 

zc 

Fleight  at  which  to  compute  the  propagation  factor  for 
clutter  computations.  The  height  is  specified  with  respect 
to  hmref 

meters 

APMINIT  CSC 

zoutma 

Array  output  heights  relative  to  “real”  antref 

meters 

APMINIT  CSC 

Table  81.  FEDR  SU  output  data  element  requirements. 


Name 

Description 

Units 

Fat\m 

Propagation  factor  computed  at  1  m  above  the  surface. 

dB 

mpfl 

Array  of  propagation  factor  and  loss 

pV/m 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for 

radians, d 

the  direct  and  reflected  rays  (where  applicable)  for  all  output  height/range 
points 

B 

5.2.7  Flat-Earth  Model  (FEM)  SU 

The  FEM  SU  computes  propagation  loss  at  a  specified  range  based  upon  FE 
approximations.  The  following  steps  1  through  11,  are  performed  for  each  APM  height 
output  point  j  from  jfs  to  jpe. 
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1.  The  receiver  height  at  the  jth  output  point,  zoutj,  is  first  adjusted  relative  to  the  antenna 
height  for  both  the  direct  and  reflected  ray  paths  and  is  also  corrected  for  earth 
curvature  and  average  refraction.  The  receiver  heights,  zm  and  zp,  relative  to  both  the 
real  (direct)  and  image  (reflected)  antenna  height,  respectively,  are  defined  as 
follows: 


=  zoutmaj  - 


=  zoutpa  •  - 


rout 

twoka 

2 

rout 

twoka 


where  zoutmaj  and  zoutpaj  represent  the  output  height  zoutj  relative  to  the  “real”  and 
“image”  antenna  heights,  respectively,  with  respect  to  mean  sea  level,  twoka  is  twice 
the  effective  earth  radius  as  calculated  in  the  FILLHT  SU.  If  the  range  rout  is  less  than 
2.5  km,  then  zm  and  zp  are  set  equal  to  zoutmaj  and  zoutpaj,  respectively. 

2.  Next,  the  point  or  range,  of  reflection,  xrejiect,  is  given  by 


ant , 


X  —T 

reflect  out 


ref 


This  quantity  is  used  when  referencing  the  GETREFCOEF  SU. 

3.  The  elevation  angles  for  the  direct-  and  reflected-path  rays,  a d  and  ar,  respectively, 
are  given  as 


r  _  a 


ad  =  TAN 


-l 


ar  =  TAN 


-l 


\rout  J 

f  Z  ^ 
P 

\rout  J 


4.  The  ANTPAT  SU  is  referenced  with  the  direct-path  elevation  angle  to  obtain  the 
antenna  pattern  factor  for  the  direct-path  ray,  f(ad);  and  with  the  grazing  angle 
(opposite  of  the  reflected-path  ray  angle)  to  obtain  the  antenna  pattern  factor  for  the 
surface-reflected  ray ,f(-ar). 
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5.  The  path  lengths  for  both  the  direct-path,  r\,  and  surface-reflected  path,  r2,  are 
computed  from  simple  right  triangle  calculations,  as 


6.  The  GETREFCOEF  SU  is  referenced  with  the  reflected-path  ray  angle  to  obtain  the 
amplitude,  Rmag,  and  phase  angle,  cp ,  of  the  surface-reflection  coefficient. 

7.  From  the  two  path  lengths,  the  surface-reflection  phase  lag  angle,  and  the  free-space 
wave  number,  k0,  the  total  phase  angle  is  determined  as 

n  =  (r2  —  rx  )k0  +  (p  . 

8.  The  square  of  the  coherent  sum  of  both  the  direct-path  ray  and  surface-reflected  path 
ray  is  computed  as 

fL  =|/M2  +  RLj(-arf+2f(aPR„lagf(-a,.)COS(n)  . 

9.  The  propagation  factor  in  decibels,  FdB,  is  computed  as 

FdB =iolog10[max(/;L,io-2!)J. 

A  limit  of  -250  dB  was  put  on  FdB  to  avoid  underflow  problems. 

10.  The  propagation  factor  and  loss  for  the  output  point  zoutj  is  calculated  and  rounded  to 
the  nearest  centibel  as 

mpflij  =NINT(l0(L/s  -FdB+rxgasatt)) 
mPfl2,j  =NINt(io(l/s  -  mpflX  j  )) 

where  Lfs  is  the  free-space  loss  term  in  decibels  and  is  given  by 

Lfs  -  20  LOG10  (ij  )+  plcnst . 

11.  If  the  propagation  factor  and  angle  are  to  be  output  (/a«g=‘.true.’),  then  a*  ar,j{ad), 

and  in  dB,  are  stored  in  array  propaf 
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Once  the  loss  has  been  computed  for  all  heights,  the  final  step  is  to  compute  the 
propagation  factor  at  1  m  above  the  surface  if  clutter  computations  are  to  be  performed 
(Ciut  =  ‘.true.’).  The  propagation  factor  is  computed  at  height  zc  according  to  steps  1 
through  1 1  above.  The  SU  is  then  exited. 

Table  82  and  Table  83  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FEM  SU  input  and  output  data  element. 


Table  82.  FEM  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Cintref 

Transmitting  antenna  height  relative  to  hmjnter 

meters 

TERINIT  SU 

Cm 

Logical  flag  used  to  indicate  if  surface  clutter  calculations 
are  desired. 

N/A 

Calling  CSCI 

gasatt 

Gaseous  absorption 

dB/m 

GASABS  SU 

htlim 

Maximum  height  relative  to  hmi„ler 

meters 

TERINIT  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

jfe 

Ending  index  within  mpfl  of  FE  loss  values 

N/A 

Calling  SU 

jfi 

Starting  index  within  mpfl  of  FE  loss  values 

N/A 

Calling  SU 

k0 

Free-space  wavenumber 

meters"1 

APMINIT  CSC 

lang 

Logical  flag  indicating  if  propagation  angle  and 
propagation  factor  output  is  desired. 

N/A 

Calling  CSCI 

plcnst 

Constant  used  in  determining  propagation  loss  (plcnst  =  20 
logi0(2£o)) 

dB/m2 

APMINIT  CSC 

J“oUt 

Current  output  range 

meters 

Calling  SU 

rsqrd 

Array  containing  the  square  of  all  desired  output  ranges 

meters2 

APMINIT  CSC 

twoka 

Twice  the  effective  earth’s  radius 

meters 

GET  K  SU 

y/ref 

Ground  elevation  height  at  source 

meters 

APMINIT  CSC 

zc 

Fleight  at  which  to  compute  the  propagation  factor  for 
clutter  computations.  The  height  is  specified  with  respect  to 

hmref 

meters 

APMINIT  CSC 

zoutma 

Array  output  heights  relative  to  “real”  antref 

meters 

APMINIT  CSC 

zoutpa 

Array  output  heights  relative  to  “image”  antref 

meters 

APMINIT  CSC 

Table  83.  FEM  SU  Output  Data  Element  Requirements. 


Name 

Description 

Units 

ad 

Direct  path  ray  angle 

radians 

Fat\m 

Propagation  factor  computed  at  1  m  above  the  surface. 

dB 

mpfl 

Propagation  factor  and  loss  array 

cB 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for  the 
direct  and  reflected  rays  (where  applicable)  for  all  output  height/range  points 

radians, d 

B 

138 


5.2.8  Fast-Fourier  Transform  (FFT)  SU 

The  FFT  SU  separates  the  real  and  imaginary  components  of  the  complex  PE 
field  into  two  real  arrays  and  then  references  the  DRST  SU  to  transform  each  portion  of 
the  PE  solution. 

For  a  transform  size,  n^,  the  real  and  imaginary  parts  of  the  complex  PE  field 
array  U,  respectively,  are  found  for  the  index  /  from  0  to  rip. : 


xdumi =REAL(U;  ) 
ydumi  =imag(u;) 


The  DRST  SU  is  referenced  in  turn  for  xdum  and  ydurn  along  with  Inp,  the  power 
of  the  transform  size  to  the  base  2.  The  real  and  imaginary  parts  of  the  resulting  transfonn 
arrays  are  then  converted  to  the  complex  array  U  for  i  equal  0  to  nift  by 


Uj  =C  .VI P  L X  {xdumi ,  ydumi )  . 

Table  84  and  Table  85  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FFT  SU  input  and  output  data  element. 


Table  84.  FFT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

lnfft 

Power  of  2  transform  size,  i.e.  np=  2lnffl 

N/A 

FFTPAR  SU 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

U 

Complex  field  to  be  transformed 

pV/m 

Calling  SU 

Table  85.  FFT  SU  output  data  element  requirements. 


Name 

Description 

Units 

U 

Transform  of  complex  field 

pV/m 

5.2.9  Free  Space  Range  Step  (FRSTP)  SU 

The  FRSTP  SU  is  to  propagate  the  complex  PE  solution  in  free  space  by  one 
range  step. 

Upon  entry  the  PE  field ,farray,  is  transformed  to  p-space  (Fourier  space)  and  its 
array  elements  are  multiplied  by  corresponding  elements  in  the  free  space  propagator 
array ,frsp.  Before  exiting,  the  PE  field  is  transfonned  back  to  z-space.  Both  transfonns 
are  perfonned  by  referencing  the  FFT  SU. 
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Table  86  and  Table  87  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FRSTP  SU  input  and  output  data  element. 


Table  86.  FRSTP  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

farray 

Field  array  to  be  propagated  one  range  step  in  free  space 

pV/m 

Calling  SU 

frsp 

Complex  free  space  propagator  term  array 

N/A 

PEINIT  SU 

ft  ml 

N/A 

PEINIT  SU 

Table  87.  FRSTP  SU  output  data  element  requirements. 


Name 

Description 

Units 

farray 

Propagated  field  array 

pV/m 

5.2.10  FZLIM  SU 

The  FZLIM  SU  calculates  and  stores  the  outward  propagation  angle  and 
propagation  factor  at  the  top  of  the  PE  region  for  the  current  PE  range.  The  following 
steps  1  through  5  are  performed  for  each  reference  to  the  FZLIM  SU. 

1 .  The  FN  GETPFAC  function  is  referenced  to  determine  the  propagation  factor  F^b  at 
height  zum-ycur. 

2.  If  this  is  the  first  reference  to  the  FZLIM  SU  (iz  =  1),  then  the  FN_GETPFAC 
function  is  referenced  to  determine  the  propagation  factor,  F^Bist,  at  the  previous  PE 
range.  A  linear  interpolation  is  perfonned  on  F^b  and  Fcmst  to  compute  the 
propagation  factor  at  range  ratz  where  the  XO  region  begins.  The  interpolated 
propagation  factor  and  the  outward  propagation  angle,  Fratz  and  aatz,  respectively,  are 
stored  in  array  ffacz.  Next,  a  reference  to  the  SAVEPRO  SU  is  made  to  store  the 
refractivity  profile  at  the  current  range  from  height  z/„„  to  the  maximum  desired 
output  height. 

3.  A  reference  is  made  to  the  SPECEST  SU  to  determine  the  outward  propagation  angle, 
i90llt-  The  counter  iz  is  incremented,  but  is  limited  to  izmax.  The  propagation  factor  /v«, 
current  PE  range  r,  and  ,9ou,  (with  maximum  limit  of  aatz)  are  stored  in  ffacz  \  jz, 
Jfacz2,iz,  and  ffacz yiz,  respectively. 


4.  If  iz  is  greater  than  2,  then  the  propagation  angle  is  checked  and  slightly  altered  to 
avoid  extreme  spiking  when  using  these  angles  in  the  XO  region.  If fter  is  ‘.false.’  then 
the  angle  stored  in  ffacz  is  the  smaller  of  <9ou,  or  the  previously  stored  angle.  Now,  if 
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fer  is  ‘.false.’,  or  conversely,  if fer  is  ‘.true.’  AND  iz  is  less  than  or  equal  to  10,  then 
the  z'zth  angle  stored  is  adjusted  and  given  by 


adif  =ffaCZZ,iz  -  ffaCZl,iz-\ 

ffaczi,iz  =ffaczx*-\  ±MIN(af/;/  ,  10  4) 

where  ‘+’  or  ‘-‘  is  used  depending  on  the  sign  of  a dif . 

5.  Before  exiting,  a  final  reference  to  the  SAVEPRO  SU  is  made  to  store  the  refractivity 
profile  from  height  z/im  to  the  maximum  desired  output  height  at  the  current  range. 

Table  88  and  Table  89  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FZLIM  SU  input  and  output  data  element. 


Table  88.  FZLIM  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

^atz 

Local  ray  or  propagation  angle  at  height  z;,-m  and  range  rat- 

radians 

APMINIT  CSC 

At'pe 

PE  range  step 

meters 

PEIN1T  SU 

AZpe 

PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

FFTPAR  SU 

fer 

Logical  flag  indicating  if  terrain  profde  has  been  specified: 
.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

iz 

Number  of  propagation  factor,  range,  angle  triplets  stored  in 
ffacz 

N/A 

APMINIT  CSC 
FZLIM  SU 

IZmax 

Maximum  number  of  points  allocated  for  arrays  associated 
with  XO  calculations 

N/A 

APMINIT  CSC 

r 

Current  PE  range 

meters 

Calling  SU 

P atz 

Range  at  which  Z/lm  is  reached  (used  for  hybrid  model) 

meters 

APMINIT  CSC 

V  last 

Previous  PE  range 

meters 

Calling  SU 

nog 

10  logio(  PE  range  r  ) 

N/A 

PESTEP  SU 

^ loglst 

10  logi0(  previous  PE  range  r,asl ) 

N/A 

PESTEP  SU 

u 

Complex  PE  field  at  range  r 

|iV/m 

PESTEP  SU 

Ulast 

Complex  PE  field  at  range  r/asl 

|iV/m 

PESTEP  SU 

y cur 

Height  of  ground  at  current  range  r 

meters 

PESTEP  SU 

yiast 

Height  of  ground  at  previous  range 

meters 

PESTEP  SU 

^ Urn 

Height  limit  for  PE  calculation  region 

meters 

GETTHMAX  SU 

141 


Table  89.  FZLIM  SU  output  data  element  requirements. 


Name 

Description 

Units 

ffacz 

Array  containing  propagation  factor,  range,  and  propagation  angle  at  z/!m 

dB,  meters, 
radians 

iz 

Number  of  propagation  factor,  range,  angle  triplets  stored  in  ffacz 

N/A 

5.2.11  Get  Propagation  Factor  (FN  GETPFAC)  Function 

The  FN  GETPFAC  function  determines  the  propagation  factor  at  a  specified 

height. 


First,  linear  interpolation  is  performed  on  the  magnitudes  of  the  PE  field  at  bins  k 
and  k+\  to  determine  the  magnitude  pmag  of  the  field  at  the  receiver  height,  zr : 


P 


mag 


where  the  interpolation  fraction  fr  is  determined  from 


fr  =  -r1—  -  kAzps  ^  zr  <{k  + 1  )Azpe 
Azpe 


( 

£=INT 

V 


Az 


PE  J 


20 

pmag  is  constrained  to  be  not  less  than  10'"  pV/m.  Finally,  the  propagation  factor  in  dB, 
FdB  is  given  by 


Fa  =20LOGla(MAx(p„s,  l(r20))+  rhs . 

Table  90  and  Table  91  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  GETPFAC  function  input  and  output  data  element. 


Table  90.  FN_GETPFAC  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Azpe 

PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

Calling  SU 

r log 

10  logio(  PE  range  r  ) 

N/A 

Calling  SU 

u 

Complex  PE  field  at  range  r 

pV/m 

Calling  SU 

Zr 

Receiver  height 

meters 

Calling  SU 
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Table  91.  FN_GETPFAC  SU  output  data  element  requirements. 


Name 

Description 

Units 

Fjb 

Propagation  factor  at  specified  height  zr 

dB 

5.2.12  Get  Reflection  Coefficient  (GETREFCOEF)  SU 

The  GETREFCOEF  SU  computes  the  Fresnel  complex  reflection  coefficient  for  a 
given  grazing  angle,  y/. 

Upon  entering,  the  proper  dielectric  constant  nc]  to  be  applied  to  the  reflected  ray 
must  be  determined.  If  the  current  range  is  within  the  FE  and  RO  regions,  the 
FN  DIECON  function  is  referenced  to  detennine  the  correct  nc]  for  that  range. 
Otherwise,  the  value  fornc2  is  set  equal  to  the  current  value,  nc ]  at  the  PE  range.  The 

corresponding  dielectric  constant  nc]  is  used  in  the  following  equations  to  compute  the 
reflection  coefficient: 


_  nc]  SIN(i//) -  ^ jnc ]  -  COS2 (i//) 
nc]  SIN(^)  +  -yjnc]  -COS2(i//)  ’ 

r  SIN(^)-Vnc2-COS2(^) 

SIN(^)  +  -yjnc]  -COS2(^) 

where  ToV  and  To//  represent  the  reflection  coefficients  for  vertical  and  horizontal 
polarization,  respectively,  and  nc]  is  computed  in  the  DIEINIT  SU  and  is  given  by 

nc]  =  £,  +  j 60a,A . 

Si  and  <jf  are  the  relative  pennittivity  and  conductivity,  respectively,  to  be  applied  at  range 
rgrndj,  and  A  is  the  wavelength. 

If  rough  surface  calculations  are  required  ( ruf  =  ‘.true.’)  the  Miller-Brown 
roughness  reduction  factor  is  computed.  Wind  speeds  specified  by  the  calling  CSCI  are 
allowed  to  vary  with  range,  therefore  the  FN_CURWIND  function  is  referenced  to  obtain 
the  wind  speed  a>s  at  the  current  range.  The  sea  surface  rms  wave  height  is  then  computed 
from 


rufh,  =ruffacO)] 


143 


and  the  roughness  reduction  factor  p  is  detennined  by 


P 


3.2x„  -2  + 


(3.2xJ 


■7Xg+9 


where 


*„=  J  [™A  SEN  )] 2 . 


The  final  reflection  coefficient  is  then  computed  as  T v,h  =  pTof.o//- 

Lastly,  the  magnitude  and  phase  of  the  complex  reflection  coefficient  are 
determined  from 


R . =lr, 


mag 


V,H 


^j  =  TAN_ 


W22) 


Table  92  and  Table  93  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GETREFCOEF  SU  input  and  output  data  element. 


Table  92.  GETREFCOEF  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

HP  flag 

HF  computation  flag  indicating  the  frequency  specified 
is  less  than  50  MHz 

N/A 

APMINIT  CSC 

1 flag 

Integer  flag  indicating  what  region  reflection 
coefficient  is  being  computed 

0  =  FE  and  RO  regions 

1  =  PE  region 

N/A 

Calling  SU 

Igr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

2 

nc 

Array  of  complex  dielectric  constants 

N/A 

DIEINIT  SU 

nw 

Number  of  wind  speeds 

N/A 

Calling  CSCI 

V 

Grazing  angle 

radians 

Calling  SU 

r 

Current  calculation  range 

meters 

Calling  SU 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types 
apply. 

meters 

Calling  CSCI 

mgwind 

Ranges  of  wind  speeds  entered:  mgwind \  =  range  of  ith 
wind  speed 

meters 

Calling  CSCI 

144 


Table  92.  GETREFCOEF  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

ruf 

Logical  flag  indicating  if  rough  sea  surface  calculations 
are  required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface 
calculations 

N/A 

APMINIT  CSC 

ruffac 

Factor  used  for  wave  height  calculation 

meters"1 

APMINIT  CSC 

wind 

Array  of  wind  speeds 

meters/sec 

Calling  CSCI 

Table  93.  GETREFCOEF  SU  output  data  element  requirements. 


Name 

Description 

Units 

T  v,h 

Complex  reflection  coefficient  for  vertical  (V)  and  horizontal  (FI)  polarization 

N/A 

Rmag 

Magnitude  of  the  reflection  coefficient 

N/A 

(P 

Phase  of  the  reflection  coefficient 

radians 

5.2.13  Get  Troposcatter  Loss  (FN_GET_TLOSS)  Function 

The  FN  GET  TLOSS  function  computes  loss  due  to  troposcatter  and  determine 
the  appropriate  loss  to  add  to  the  already  calculated  propagation  loss  at  a  specific 
transmitter  and  receiver  point  over  land  and  water. 

Upon  entering  the  function,  ftloss  is  initialized  to  the  propagation  loss  at  the 
particular  receiver  height  and  range,  xloss.  The  range  from  the  receiver  to  the  tangent 
point  d2  is  also  initialized  to  that  value  for  smooth  surface,  d2se. 

The  tangent  angle  from  the  receiver,  $2,  is  initialized  to  the  tangent  angle  from  the 
particular  receiver  height  over  smooth  surface,  92.se  .  However,  if fer  =  ‘.true.’,  then  the 
largest  tangent  angle  <22  and  range  di  from  the  receiver  to  the  tangent  point  are  determined 
using  an  iterative  loop  performed  for  index  i  from  ja- 1  to  jti  in  decrements  of  -1  as 
follows: 


r2  =rout-iArPE 

h  -  tvh .-  r, 

do  = - ^-L  +  - 


twoka 


where  h  is  the  reciever  height. 

If  the  current  9i  value  is  less  than  <22,  then  82  is  set  equal  to  <22  and  di  is  set  equal 
to  V2-  The  index  i  is  decremented  by  one  and  the  above  calculations  are  repeated. 


145 


Once  the  above  loop  is  completed,  the  final  value  of  <9?  is  checked.  If  it  is  greater 
than  the  tangent  angle  for  smooth  surface  fflse  (at  the  same  receiver  range),  then  both  $2 
and  di  are  set  equal  to  i92.se’  and  dlse,  respectively. 

Next,  if  rout  is  less  than  the  sum  of  the  tangent  ranges,  d\  and  di,  then  the  SU  is 
exited.  Otherwise,  function  program  flow  continues  with  the  next  step. 

To  account  for  antenna  pattern  effects  over  terrain,  the  ANTPAT  SU  is  referenced 
using  the  tangent  angle  from  the  source  to  determine  the  antenna  pattern  factor,  /(<9|).  The 
troposcatter  loss  term  is  then  adjusted  from  its  smooth  surface  value  as 

tlst  =  tlsts  -  20  LOG10  [/($! )] . 

Next,  the  common  volume  scattering  angle  is  given  by 

9  =  $0  ■  — 19.  —  i97  . 

lstp  1  z 


The  following  calculations  are  made  to  determine  the  effective  scattering  height  h0 


1  antdif 

a  =  —  .90  -&  + - y~ 

2  s,p  r  , 


j  ant 

b  =  -9  0,  —  i92  — 

o  lstp  L 


dif 


out 


c 

f  a 

\ 

5  =  MIN 

MAX 

0.1,- 

l  bj 

,10  , 

V 

) 

/,  -  srme  , 

°  lojlA2)' 


The  parameter  rjs  is  then  calculated  as  a  function  of  h0: 


Vsx  =  -5696  hQ  j^l  +  snAe  3'8xl°  h°  J , 

qs  =  MIN(MAX(.0 1 ,  r]sx ),  5). 

Next,  the  parameters  ct\  and  ctj  are  defined  as 

ctx  =16.3 +  13.3% 
ct2  =0.4  +  0.16%  ’ 
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where  these  are  in  turn  used  to  calculate  the  quantities  r\  and  r 2: 


r1=MAX(0A,rtl&), 
r2  =MAx(o.l,r/  hd). 


The  quantity  rf  was  previously  determined  by  referencing  the  TROPOINIT  SU. 
ct\,  cti,  r\,  and  r 2  are  next  used  to  determine  H\  and  1 1 2, 

Hx=  MAX 
H2=  MAX 


0,cq(/|  +ct2) 

0,  ctx  (r2  +  ct2  )  ^ 


The  frequency  gain  function  H0  is  then  determined  by 


H  Hi  +  h2  +AH 


where 


Affo=6[.6-LOG10(7J)]LOG10(J)LOG10fe), 
qt=  MIN 


(  .  \ 

10,  MAX 

0.1,  A. 

v  sr\)_ 

A H0  is  not  allowed  to  be  larger  than  Zi(H\+  HZ)  and  H0  is  set  equal  to  0  if  it  becomes 
negative. 

Next,  the  troposcatter  loss  is  computed  from 

f loss  =  tlst  + 573  0+rl°Soisip+Ho  ■ 

Finally,  through  a  method  of  “bold  interpolation”  the  final  propagation  loss  ftloss, 
is  adjusted  for  loss  due  to  troposcatter  according  to 

Ldf=  ftloss -tloss, 
ftloss  =  tloss  for  Ldif  >18  dB, 

ftloss  =  ftloss  - 1 0  LOG10  (l  +  1 00'"""  )  for  Ldf  >-18  dB  . 
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Table  94  and  Table  95  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  GET  TLOSS  function  input  and  output  data 
element. 


Table  94.  FN_GET_TLOSS  function  input  data  element  requirements. 


Name 

Description 

Units 

Source 

mi  Gy 

Difference  between  the  transmitter  and  receiver  heights 

meters 

Calling  SU 

dl 

Range  from  the  transmitter  source  to  the  tangent  point 

meters 

Calling  SU 

d2se 

Range  from  the  receiver  height  to  the  tangent  point  over 
smooth  surface 

meters 

Calling  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

h 

Receiver  height  at  particular  range  rout 

meters 

Calling  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

jtl 

Ending  index  counter  for  tyh  array 

N/A 

Calling  SU 

jt2 

Starting  index  counter  for  tyh  array 

N/A 

Calling  SU 

rf 

Constant  used  for  troposcatter  calculations 

meters"1 

TROPOINIT  SU 

rlogo 

Array  containing  20  times  the  logarithm  of  all  output  ranges 

N/A 

APMINIT  CSC 

1  out 

Current  output  range 

meters 

Calling  SU 

rti 

rf  *  antref 

N/A 

TROPOINIT  SU 

sni 

Surface  refractivity  term  used  in  troposcatter  loss 
calculation 

N/A 

Calling  SU 

90 

Array  of  angles  used  to  determine  common  volume 
scattering  angle 

radians 

TROPOINIT  SU 

9, 

Tangent  angle  from  source  (for  smooth  surface) 

radians 

Calling  SU 

92se 

Tangent  angle  from  the  receiver  height  over  smooth  surface 

radians 

Calling  SU 

tlsts 

Troposcatter  loss  term  for  smooth  surface 

N/A 

Calling  SU 

twoka 

Twice  the  effective  earth  radius 

meters 

GET  K  SU 

tyh 

Adjusted  height  points  of  terrain  profile  at  every  PE  range 
step. 

meters 

PEINIT  SU 

xloss 

Propagation  loss  for  receiver  height  h  and  range  rout 

dB 

Calling  SU 

Table  95.  FN_GET_TLOSS  function  output  data  element  requirements. 


Name 

Description 

Units 

ftloss 

Propagation  loss  with  troposcatter 

dB 
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5.2.14  Linear  Interpolation  (FNPLINT)  Function 

This  function  performs  a  linear  interpolation  on  parameters  pl\  and  ph  over  a 
fractional  term  frac. 

The  final  interpolated  value  plint  is  determined  according  to 

Phnt  =ph+fracipl2-ph) 

and  is  returned  to  the  calling  SU. 

Table  96  and  Table  97  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  FN  PLINT  function  input  and  output  data  element. 


Table  96.  FN_PLINT  function  input  data  element  requirements. 


Name 

Description 

Units 

Source 

frac 

Fractional  quantity  over  which  to  interpolate 

N/A 

Calling  SU 

ph 

First  parameter  value 

N/A 

Calling  SU 

ph 

Second  parameter  value 

N/A 

Calling  SU 

Table  97.  FN_PLINT  function  output  data  element  requirements. 


Name 

Description 

Units 

plint 

Interpolated  parameter 

N/A 

5.2.15  Mixed  Fourier  Transform  (MIXEDFT)  SU 

The  MIXEDFT  SU  propagates  the  PE  field  in  free  space  one  PE  range  step, 
applying  the  Leontovich  boundary  condition,  using  the  mixed  Fourier  transfonn  as 
outlined  by  Kuttler  and  Dockery  (1991).  For  finite  conducting  boundaries  (i.e.,  if  vertical 
polarization  is  specified  or  rough  surface  calculations  are  required)  and  the  frequency  is 
less  than  400  MFIz,  the  central  difference  form  of  the  DMFT  is  used.  If  the  frequency  is 
greater  than  400  MHz,  the  backward  difference  form  of  the  DMFT  is  used. 

Upon  entering  the  SU,  the  first  and  last  elements  of  the  w  array  h'o  and  wn^  are 
initialized  to  0.  If  using  the  central  difference  form  of  the  DMFT  (/),/„  =1)  the  following 
steps  1  through  6  are  performed. 
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1 .  The  difference  field  for  the  vertical  PE  calculation  grid  is  computed  from  the  PE  field 
as 


Um-U^ 


2Az 


+  ahJJ ;  i  —  1, 2, 3,. 


>  ft  ml 


PE 


2.  Next,  the  FRSTP  SU  is  referenced  to  transform  w  to  p-space,  propagate  the  field 
forward  one  PE  range  step,  and  is  transformed  back  to  z-space  upon  return. 

3.  The  coefficients  used  in  the  central  difference  form  of  the  mixed  transform,  Ck\  and 
Cki,  are  propagated  to  the  new  range  as  follows: 

Ckl=Ckl  C]x 

Ck2  =Ck2  (~2x 

4.  The  particular  solution  ym  of  Kuttler’s  difference  equation  is  then  computed  as 
follows: 


ymi  =  2/tpEWi  +  RTwi_] ;  i=l,  2, 3, nml 

ym0  =  0, 


where  RT  is  a  quadratic  root  as  computed  in  the  GETALN  SU. 

5 .  The  complex  PE  field  U  is  then  determined  from 

U„-i  =  Rt  (ymn-i  ~  Un_i+ 1 ) ;  /'  =  1, 2, 3, nfft 

U0=  0 

6.  The  final  step  in  computing  the  PE  field  U  is 

ui  =  ui  +  arnh  +  brrnn-i  (“  0" 5  i  =  0, 1, 2, nfft , 

where 


ar  =  ck !  -  R, 


br=ck2  -Rk 


'AUo+'/2U  r„  :+  Y.U, 


i= 1 


U0rnnffl  +1AUnffl  +  Z  Un-irni(~  0 


i= 1 


150 


If  using  the  backward  difference  fonn  of  the  DMFT  (iaig  =  2),  then  the  following 
steps  1  through  6  are  performed. 

1 .  The  difference  field  for  the  vertical  PE  calculation  grid  is  computed  from  the  PE  field 
as 


Wj—Ui  R/U ,„| ;  i  —  1,2, 3,...., nml 

2.  Next,  the  FRSTP  SU  is  referenced  to  transform  w  to  p-space,  propagate  the  field 
forward  one  PE  range  step,  and  is  transformed  back  to  z-space  upon  return. 

3.  The  coefficient  cruft  is  then  propagated  forward  one  range  step  via 


cmft  =  cmft  *  cmftx . 


4.  The  particular  solution  of  the  field  U  is  now  computed  from 

U j  =  Wj  +  RjU (_| :  i  =  1, 2, 3, n  ^ 

u0=  o. 


5.  The  coefficient  ar  for  the  homogeneous  solution  is  determined  as 


JJT 

cmft-  JUpi, 


a..  =- 


i=0 


f  \ 


Z 

;=0 


rn; 


6.  Finally,  the  PE  field  U  for  the  backward  difference  DMFT  is  computed  as  the  sum  of 
the  homogeneous  and  particular  solutions: 

Ui  =  Ut  +  apri; ;  i=0, 1, 2, nfft . 
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Table  98  and  Table  99  provide  identification,  description,  units  of  measure,  and  the 
computational  source  for  each  MIXEDFT  SU  input  and  output  data  element. 


Table  98.  MIXEDFT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

CCh,  y 

Surface  impedance  term  for  horizontal  and  vertical  polarization 

N/A 

GETALN  SU 

Cjx 

Constant  used  to  propagate  ck,  by  one  range  step  in  central 
difference  algorithm 

N/A 

GETALN  SU 

C2x 

Constant  used  to  propagate  ck2  by  one  range  step  in  central 
difference  algorithm 

N/A 

GETALN  SU 

cki 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

ALNJNIT  SU 

ck2 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

ALNJNIT  SU 

cmft 

Coefficient  used  in  backward  difference  form  of  DMFT 

N/A 

ALNJNIT  SU 

cmftx 

Constant  used  to  propagate  cmft  by  one  range  step  in  backward 
difference  algorithm 

N/A 

GETALN  SU 

Az2  p£ 

Twice  the  PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

PE1NIT  SU 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being  used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 

nfft 

Transform  size 

N/A 

FFTPAR  SU 

Mml 

njft-l 

N/A 

APMINIT  CSC 

Rk 

Coefficient  used  in  C\  and  C2  calculations. 

N/A 

GETALN  SU 

rn 

Array  ofi?rto  the  ith  power  (e.g.,  r«;  =  Rp) 

N/A 

GETALN  SU 

Rt 

Complex  root  of  quadratic  equation  for  mixed  transform 
method  based  on  Kuttler’s  formulation 

N/A 

GETALN  SU 

U 

Complex  field  at  range  r 

pV/m 

PESTEP  SU 

Table  99.  MIXEDFT  SU  output  data  element  requirements. 


Name 

Description 

Units 

ck i 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

ck2 

Coefficient  used  in  central  difference  form  of  DMFT 

N/A 

cmft 

Coefficient  used  in  backward  difference  form  of  DMFT 

N/A 

U 

Complex  field  at  range  r 

pV/m 

w 

Difference  equation  PE  field  array 

pV/m 

ym 

Field  from  recursion  equation  for  central  difference  DMFT 

pV/m 
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5.2.16  Parabolic  Equation  Step  (PESTEP)  SU 

The  PESTEP  SU  computes  propagation  loss  at  a  specified  range  based  upon  the 
split-step  Fourier  PE  algorithm. 

Upon  entering  the  PESTEP  SU,  if  the  current  output  range  step,  istp,  is  equal  to  1, 
the  current  PE  range  r  and  riog  (10  times  the  logarithm  of  r)  are  set  equal  to  zero.  The 
current  PE  range  step  ipEstp  is  also  set  equal  to  0.  An  iterative  DO  WHILE  loop  is  then 
begun  to  advance  the  PE  solution  such  that  for  the  current  PE  range,  a  PE  solution  is 
calculated  from  the  solution  at  the  previous  PE  range.  This  iterative  procedure  is  repeated 
in  the  DO  WHILE  loop  until  r  is  greater  than  the  output  range  rout.  The  following  steps  ( 1 
through  8)  are  performed  for  each  PE  range  step  within  the  DO  WHILE  loop. 

1 .  First,  if  the  current  PE  range,  r,  is  greater  than  zero,  then  the  height  of  the  ground  at 
the  previous  PE  range  ylast  is  set  to  the  height  of  the  ground  at  the  current  PE  range 
ycur .  Next,  the  previous  PE  range  r/ast  is  set  equal  to  the  current  PE  range  r.  The 
complex  PE  field,  U,  of  the  previous  range  is  stored  in  array  Ulast  for  subsequent 
horizontal  interpolation  at  range  rout.  In  addition,  r  is  incremented  by  one  PE  range 
step,  A rPE .  A  new  r/og  is  computed  and  the  PE  range  step  ipEstp  is  incremented  by  one. 
Finally,  the  range  at  which  interpolation  for  range-dependent  refractivity  profiles  is 
performed,  rmid,  is  also  incremented  by  one-half  the  PE  range  step. 

2.  If  performing  a  terrain  case  (fter  is  ‘.true.’),  the  ground  heights  ycur  and  yCUrm,  at  range  r 
and  rmid,  respectively,  must  be  determined.  ycur  is  set  equal  to  the  terrain  height  at  the 
current  PE  range  step,  tyh[pEstp.  ycurm  is  detennined  as 

ycurm  =  +  y  cur}- 


If  y cur  is  less  than  yiast  and  the  frequency  is  greater  than  50  MHz  (///y/f,g=’.  false.’), 
then  the  DOSHIFT  SU  is  referenced  to  shift  the  field  accordingly. 


3.  If  the  APM  CSCI  is  being  used  in  a  range-dependent  mode  (i.e.,  the  number  of 
profiles  tiprof  is  greater  than  1),  or  if  a  terrain  profile  is  specified,  the  REFINTER  SU 
is  referenced  to  compute  a  new  modified  refractive  index  profile,  profint,  adjusted  by 
the  local  ground  height  ycurm  at  range  rmid.  If  an  HF  case  is  being  perfonned  and  a 
terrain  profile  has  been  specified,  then  the  difference  in  terrain  slopes,  tnidif,  is 
computed  and  a  new  environmental  phase  array,  envpr,  is  re-computed  as 


envprk  =  e 


i(ArPE  profint  k+koZktmj, 


;  *=0,1,2,.../!#, 


Otherwise,  envpr  is  computed  with  the  second  term  in  the  exponent  set  equal  to  0. 
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4.  The  current  PE  range  is  then  checked  against  the  range  of  the  current  ground  type 
given  by  array  rgrnd,  and  if  necessary,  the  ground  type  counter  ig  is  incremented.  The 
GETALN  SU  is  then  referenced  to  compute  a  new  surface  impedance  a /„  v  if  vertical 
polarization  is  required  or  if  perfonning  rough  surface  calculations.  If  performing  an 
HF  case,  then  a  new  surface  impedance  is  computed  at  each  PE  range  step. 

5.  In  order  to  propagate  the  field  in  free  space  one  PE  range  step  the  MIXEDFT  SU  is 
referenced  if  the  DMFT  algorithm  is  required;  otherwise,  the  FRSTP  SU  is 
referenced.  The  field  is  then  multiplied  by  the  environmental  array  envpr. 

6.  Next,  if  the  current  terrain  slope  is  positive,  the  DOSHIFT  SU  is  referenced  (if  not 
performing  an  HF  case)  to  shift  the  field  by  the  appropriate  number  of  bins. 

7.  If  XO  calculations  are  to  be  performed  (ixo  >1)  and  the  current  PE  range  is  greater 
than  rat:,  then  the  FZLIM  SU  is  referenced  to  determine  and  store  the  outward 
propagation  angle  at  the  top  of  the  PE  region  for  subsequent  use  in  the  EXTO  SU. 

8.  Finally,  after  the  output  range  rout  is  reached  and  the  DO  WHILE  loop  exited,  the 
CALCLOS  SU  is  referenced  to  obtain  the  propagation  loss  values  at  the  desired 
output  heights  at  the  current  output  range  rout. 

Table  100  and  Table  101  provide  identification,  description,  units  of  measure,  and 

the  computational  source  for  each  PESTEP  SU  input  and  output  data  element. 


Table  100.  PESTEP  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Ar pe 

PE  range  step 

meters 

PEINIT  SU 

ArpE2 

14  PE  range  step 

meters 

PEINIT  SU 

¥ 

Array  of  interpolated  grazing  angles  at  each  PE  range  step 

radians 

GRAZE  INT  SU 

flit 

Cosine-tapered  (Tukey)  filter  array 

N/A 

PEINIT  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
.true.  —  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

HFflag 

HF  computation  flag  indicating  the  frequency  specified  is 
less  than  50  MHz 

N/A 

APMINIT  CSC 

ht 

PE  mesh  height  array  of  size  njji 

meters 

PEINIT  SU 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being 
used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

N/A 

APMINIT  CSC 
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Table  100.  PESTEP  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

h 

Counter  indicating  current  ground  type  being  modeled 

N/A 

APMINIT  CSC 

lgr 

Number  of  different  ground  types  specified 

N/A 

Calling  CSCI 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

IpEstp 

Counter  indicating  current  PE  range  step 

N/A 

PESTEP  SU 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

tstp 

Current  output  range  step  index 

N/A 

Calling  SU 

t-xo 

Number  of  range  steps  in  XO  calculation  region 

N/A 

APMINIT  CSC 

iz 

Counter  for  points  stored  in  ffacz 

N/A 

FZLIM  SU 

t^inc 

Integer  increment  for  storing  points  at  top  of  PE  region  (i.e., 
points  are  stored  at  every  izinc  range  step) 

N/A 

PEINIT  SU 

nj:ft 

PE  Transform  size 

N/A 

FFTPAR  SU 

ni4 

V*  ftffl 

N/A 

PEINIT  SU 

n4 

y*  ftffl 

N/A 

PEINIT  SU 

ft prof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 

PEflag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

N/A 

Calling  CSCI 

profint 

Profile  interpolated  to  every  Azpp  in  height 

M-units 

REFINTER  SU 

r 

Current  PE  range 

meters 

PESTEP  SU 

F atz 

Range  at  which  Z/,„,  is  reached  (used  for  hybrid  model) 

meters 

APMINIT  CSC 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types 
apply. 

meters 

Calling  CSCI 

V  last 

Previous  PE  range 

meters 

PESTEP  SU 

flog 

10  log(  PE  range  r ) 

N/A 

PESTEP  SU 

max 

Maximum  specified  range 

meters 

Calling  CSCI 

y out 

Current  output  range 

meters 

Calling  SU 

ruf 

Logical  flag  indicating  if  rough  sea  surface  calculations  are 
required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface 
calculations 

N/A 

APMINIT  CSC 

tang 

Tangent  of  angle  array  from  terrain  slopes. 

radians 

PEINIT  SU 

tyh 

Adjusted  height  points  of  terrain  profile  at  every  PE  range 
step. 

meters 

PEINIT  SU 

U 

Complex  PE  field 

pV/m 

PESTEP  SU 

y cur 

Height  of  ground  at  current  range  r 

meters 

PESTEP  SU 
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Table  101 .  PESTEP  SU  output  data  element  requirements. 


Name 

Description 

Units 

envpr 

Complex  [refractivity]  phase  term  array  interpolated  every  A Zpp  in  height 

N/A 

h 

Counter  indicating  current  ground  type  being  modeled 

N/A 

IPEstp 

Counter  indicating  current  PE  range  step 

N/A 

J  end 

Index  at  which  valid  propagation  factor  and  loss  values  in  mpfl  end 

N/A 

J  start 

Index  at  which  valid  propagation  factor  and  loss  values  in  mpfl  begin 

N/A 

mpfl 

Two-dimensional  propagation  factor  and  loss  array 

cB 

mpflrtg 

Propagation  loss  and  factor  at  receiver  heights  specified  in  the  zout  rtg  array 

cB 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for  the 
direct  and  reflected  rays  (where  applicable)  for  all  output  height/range  points 

radians, 

dB 

r 

Current  PE  range 

meters 

V last 

Previous  PE  range 

meters 

nog 

1 0  log  (PE  range  r) 

N/A 

F  loglst 

10  log  (previous  PE  range  r/asl) 

N/A 

V mid 

Range  at  which  interpolation  for  range-dependent  profiles  is  performed 

meters 

u 

Complex  PE  field  at  range  r 

pV/m 

Ulast 

Complex  PE  field  at  range  ifasl 

pV/m 

y cur 

Height  of  ground  at  current  range  r 

meters 

ycurm 

Height  of  ground  at  range  r+ArpE2 

meters 

yiast 

Height  of  ground  at  previous  range  )'iast 

meters 

5.2.17  Ray  Trace  (RAYTRACE)  SU 

Using  standard  ray  trace  techniques,  a  ray  is  traced  from  a  starting  height  antref 
and  range  0,  with  a  specified  starting  elevation  angle,  a,  to  a  tennination  range,  xr.  As  the 
ray  is  being  traced,  an  optical  path  length  difference  pld  (the  difference  between  the  actual 
path  length  and  xr)  and  a  derivative  of  range  with  respect  to  elevation  angle,  dxda,  are 
being  continuously  computed.  If  the  ray  should  reflect  from  the  surface,  a  grazing  angle, 
y/,  is  determined.  Upon  reaching  the  termination  range,  a  tenninal  elevation  angle,  /?,  is 
determined  along  with  a  termination  height,  zr 

The  raytrace  is  conducted  by  stepping  in  profile  levels  and  computing  ending 
values.  A  number  of  stepping  scenarios,  based  upon  starting  and  ending  elevation  angles, 
determine  the  program  flow  of  the  RAYTRACE  SU.  These  scenarios  are  a  ray  that  is 
upgoing,  a  ray  that  is  downgoing,  and  a  ray  which  turns  around  within  a  layer. 

Upon  entering  the  SU,  a  running  range,  xsum,  the  range  at  which  a  ray  is  reflected, 
x refiech  dxda,pld,  '//,  and  a  ray  type  (direct  or  reflected)  flag,  itype,  are  initialized  to  zero.  A 
temporary  beginning  elevation  angle,  astart,  is  set  equal  to  a,  and  an  environmental  profile 


156 


level  counter,  i,  is  set  equal  to  the  array  index  for  the  height  in  the  RO  region 
corresponding  to  the  transmitter  height,  istart. 

The  sub-steps  within  the  following  steps  ( 1  and  2)  are  now  repeated  while  xsum 
remains  less  than  the  termination  range  xr.  Upon  failure  to  meet  this  repetition  criterion, 
the  SU  program  flow  continues  with  step  3  below. 

1.  The  beginning  angle  astart  is  examined  to  determine  if  the  ray  is  initially  upgoing  (i.e., 
astart  >  0)  or  downgoing.  If  it  is  upgoing,  the  SU  program  flow  continues  with  steps 
1  .a  through  1  .e,  otherwise,  the  program  flow  continues  with  step  2  below. 

a.  The  level  counter  is  examined  and  if  the  ray  is  in  the  highest  layer,  (i.e.,  i  =  levels), 
the  ending  angle,  height,  range/angle  derivative  and  path  length  difference  are 
given  as 


P  ®  start 


x 

sum 


z  =  zrt  +  — - 

t"  l  r\ 

2  gr, 


Pld  =  Pld  +  — 

gn 


1 

a  a 

gn 

V  P  a  start  J 

,2  N 

' 

start 

2 

(/?  —  a  start ) 

— 1/?3_  3 

^  v  ®  start ) 


respectively,  where  gr  is  an  intennediate  M-unit  gradient,  rm  is  an  intermediate 
M-unit,  and  zrt  is  an  intennediate  height.  Satisfaction  of  this  condition  causes  the 
failure  of  the  repetition  criterion  and  the  SU  program  flow  continues  with  step  3 
below. 

b.  If  the  ray  is  not  in  the  highest  layer,  the  ray  must  be  examined  to  detennine  if  it 
will  turn  around  and  become  a  downgoing  ray  within  the  current  layer.  This  is 
done  by  looking  at  the  radical  term,  rad,  which  will  be  used  in  the  ending  angle 
calculation.  The  radical  term  is  given  as 

i  ad  —  a^tQft  +  c[  i 
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where  q  is  an  intermediate  M-unit  difference.  If  rad  is  greater  than  or  equal  to 
zero,  a  solution  for  the  ending  angle  is  possible.  The  ray  will  not  turn  around  and 
the  program  flow  continues  with  step  l.c;  otherwise,  the  program  flow  continues 
with  step  l.d. 

c.  Before  calculations  can  continue,  the  possible  ending  range  must  be  compared  to 
the  termination  range.  This  possible  ending  range  is  determined  as 


temp 


—  X  H- 

sum 


P  ®  start 

gn 


J3=y[rad  . 


This  possible  ending  range  is  compared  to  the  tennination  range  and  if  it  is  larger, 
the  ending  angle,  height,  range/angle  derivative,  and  path  length  difference  are 
computed  from  equations  given  in  step  l.a.  Satisfaction  of  this  condition  causes 
the  failure  of  the  repetition  criterion  and  the  SU  program  flow  continues  with  step 
3  below. 

If  the  ray  has  not  reached  the  tennination  range,  xsum  is  updated  to  xtemp  ;  the 
range/angle  derivative  and  path  length  difference  are  computed  from  equations 
given  in  step  l.a,  where  fi=  V rad ;  astart  is  updated  to  /?;  the  level  counter  is 
incremented  by  one;  and  the  program  flow  returns  to  step  1  above. 

d.  If  the  ray  has,  in  fact,  turned  around  within  the  current  layer,  a  detennination  must 
be  made  for  the  ray  reaching  a  full  range  step  within  the  still  upgoing  segment,  for 
the  ray  reaching  a  full  range  step  within  the  downgoing  segment,  or  the  ray 
exceeding  the  tennination  range.  The  full  range  step  is  given  by 


which  is  compared  to  the  tennination  range.  If  it  exceeds  the  termination  range, 
the  ending  angle,  the  ending  height,  the  range/angle  derivative,  and  the  path 
length  difference  are  determined  from  equations  given  in  step  l.a.  Satisfaction  of 
this  condition  causes  the  failure  of  the  repetition  criterion  and  the  SU  program 
flow  continues  with  step  3  below.  If  the  termination  range  has  not  been  exceeded, 
further  examination  of  the  ray's  segments  must  be  made. 

e.  At  this  point,  xsum  is  updated  to  xtemp;  xtemp  is  recalculated  as  shown  in  step  l.d; 
and  xtemp  is  again  compared  to  the  termination  range. 
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If  the  termination  range  has  been  exceeded,  the  ending  angle  is  given  as 


P  =  {xr  -Xsum)gri’ 

and  the  ending  height,  the  range/angle  derivative,  and  the  path  length  difference 
are  now  determined  from  equations  shown  in  step  l.a.  Satisfaction  of  this 
condition  causes  the  failure  of  the  repetition  criterion  and  the  SU  program  flow 
continues  with  step  3  below. 

If  the  termination  range  has  not  been  exceeded,  xsum  is  updated  to  xtemp;  /?  is 
updated  to  -astart  ;  the  range/angle  derivative  and  path  length  difference  are 
determined  from  equations  shown  in  step  l.a;  astart  is  updated  to  /?;  and  the 
program  flow  returns  to  step  1  above. 

2.  Note!  The  equations  for  the  upgoing  ray  within  step  1  above  apply  equally  to  the 
downgoing  ray  except  where  specified,  otherwise.  However,  in  applying  these 
equations  to  step  2,  the  level  counter,  i,  within  the  intermediate  M-unit  gradient  sub¬ 
term,  gr,  must  be  reduced  by  one. 

The  beginning  angle  astart  has  been  examined  in  step  1  above  and  the  ray  has  been 
determined  to  be  initially  downgoing.  Similar  to  step  1  above,  the  ray  must  be 
examined  to  determine  if  it  has  turned  around  and  has  become  an  upgoing  ray  within 
the  current  layer.  This  is  done  by  looking  at  the  radical  tenn,  rad,  which  will  be  used 
in  the  ending  angle  calculation.  This  radical  term  is  given  as 

rad  =  Ogtan  ~ 

If  rad  is  greater  than  or  equal  to  zero,  a  solution  for  the  ending  angle  is  possible.  The 
ray  has  not  turned  around  and  the  program  flow  continues  with  steps  2. a  through  2.c 
below;  otherwise,  the  program  flow  continues  with  step  2.d. 

a.  Before  calculations  can  continue,  the  possible  ending  range  must  be  compared  to 
the  termination  range.  This  possible  ending  range  is  determined  from  the  equation 
given  for  xtemp  in  step  l.c,  where  fd  is  now  -4 rad  .  This  possible  ending  range  is 
compared  to  the  termination  range  and  if  it  is  larger,  the  ending  angle,  the  ending 
height,  the  range/angle  derivative,  and  the  path  length  difference  are  computed 
from  equations  shown  in  step  1  .a.  Satisfaction  of  this  condition  causes  the  failure 
of  the  repetition  criterion  and  the  SU  program  flow  continues  with  step  3  below. 
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b.  If  the  termination  range  has  not  been  exceeded,  xsum  is  updated  to  xtemp;  the 
range/angle  derivative  and  path  length  difference  are  computed  as  shown  in  step 
l.a,  where  J3=  -^1  rad;  astart  is  updated  to  J3;  and  the  level  counter  is  decremented 
by  one. 

c.  The  level  counter  is  examined  and  if  it  is  zero,  the  ray  has  reflected  from  the 
surface.  In  this  case,  the  ray  type  flag  is  set  to  1  to  indicate  a  reflection,  the 
grazing  angle  is  set  as  i//=  |«yfart|,  and  xreflect  is  set  equal  to  xtemp.  At  this  point  a 
symmetry  check  is  made.  The  idea  of  symmetry  says  that  the  ray  will  return  to  its 
starting  height,  at  twice  the  reflection  range,  with  an  ending  elevation  angle 
opposite  the  starting  elevation  angle.  Symmetry  is  used  for  APM  speed  efficiency 
so  as  to  preclude  redundant  ray  trace  calculations  on  the  upward  path  back  to  the 
starting  height.  Prior  to  applying  symmetry  however,  the  possible  ending  range 
(twice  xsum )  must  be  compared  to  the  termination  range.  If  the  termination  range 
is  exceeded  by  making  the  symmetry  assumption,  astart  is  updated  to  -astart  and 
the  assumption  is  vacated.  If  not  however,  the  assumption  is  invoked  and  astart  is 
updated  to  -a;  xsum  ,  dxda,  and  pld,  are  doubled;  and  the  level  counter  is  restored 
to  istarl.  Control  is  now  returned  to  the  top  of  step  1  above. 


d.  From  step  2,  the  ray  has  turned  around  within  the  current  layer  and  is  now  an 
upgoing  ray.  Similar  to  the  upgoing  case  of  step  1,  a  determination  must  be  made 
for  the  ray  reaching  a  full  range  step  within  the  still  downgoing  segment,  for  the 
ray  reaching  a  full  range  step  within  the  upgoing  segment,  or  the  ray  exceeding 
the  termination  range.  The  full  range  step  is  given  by  xtemp  as  computed  step  1  .d. 

If  the  full  range  step  exceeds  the  termination  range,  the  ending  angle,  the  ending 
height,  the  range/angle  derivative,  and  the  path  length  difference  are  computed 
from  equations  shown  in  step  1  .a.  Satisfaction  of  this  condition  causes  the  failure 
of  the  repetition  criterion  and  the  SU  program  flow  continues  with  section  3 
below.  If  the  tennination  range  has  not  been  exceeded,  further  examination  of  the 
ray’s  segments  must  be  made. 

e.  At  this  point,  xsum  is  updated  to  xtemp ;  xtemp  is  recalculated  as  in  step  1  .d,  and  xtemp 
is  again  compared  to  the  termination  range.  If  the  termination  range  has  been 
exceeded,  the  ending  angle  is  determined  as  in  step  l.e;  the  ending  height, 
range/angle  derivative,  and  path  length  difference  are  detennined  as  in  step  l.a. 
Satisfaction  of  this  condition  causes  the  failure  of  the  repetition  criterion  and  the 
SU  program  flow  continues  with  step  3  below. 

If  the  termination  range  has  not  been  exceeded,  xsum  is  updated  to  xtemp;  ft  is 
updated  to  -astart  ;  the  range/angle  derivative  and  path  length  difference  are 
determined  as  in  step  l.a;  astart  is  updated  to  /?;  and  the  program  flow  returns  to 
step  1  above. 
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3.  Within  APM,  the  terminal  elevation  angle  is  not  allowed  to  be  equal  to  zero. 
Therefore,  if  its  absolute  value  is  less  than  lO10,  it  is  reset  to  lO10  while  retaining  its 
present  sign. 

Table  102  and  Table  103  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  RAYTRACE  SU  input  and  output  data  element. 


Table  102.  RAYTRACE  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

a 

Source  elevation  angle 

radians 

Calling  SU 

gf 

Intermediate  M-unit  gradient  array,  RO  region 

(M-unit/m)10"6 

REFINIT  SU 

l start 

Array  index  for  height  in  RO  region  corresponding  to 

CL1T  t )'cj 

N/A 

REFINIT  SU 

levels 

Number  of  levels  in  gr,  q  and  zrt  arrays 

N/A 

REFINIT  SU 

q 

Intermediate  M-unit  difference  array,  RO  region 

2(M-unit)10"6 

REFINIT  SU 

rm 

Intermediate  M-unit  array,  RO  region 

M-unit  1(T6 

REFINIT  SU 

xr 

Terminal  range  -  called  Xrou  in  ROCALC  SU, 
equivalent  to  rout  in  calling  SU 

meters 

Calling  SU 

zrt 

Intermediate  height  array,  RO  region 

meters 

REFINIT  SU 

Table  103.  RAYTRACE  SU  output  data  element  requirements. 


Name 

Description 

Units 

P 

Terminal  elevation  angle 

radians 

dxda 

Derivative  of  range  with  respect  to  elevation  angle 

meters/radians 

Itype 

Ray  type  (direct  or  reflected)  flag 

N/A 

pld 

Path  length  from  range  xr 

meters 

V 

Grazing  angle 

radians 

% reflect 

Range  at  which  ray  is  reflected 

meters 

Zr 

Terminal  height 

meters 

5.2.18  Refractivity  Interpolation  (REFINTER)  SU 

The  REFINTER  SU  interpolates  horizontally  and  vertically  on  the  modified 
refractivity  profiles.  Profiles  are  then  adjusted  so  they  are  relative  to  the  local  ground 
height . 


Upon  entry,  the  number  of  height/refractivity  levels  ,  Ivlep,  for  the  current  profile 
is  set  equal  to  the  user-specified  number  of  levels  for  all  profiles  specified,  Ivlp.  For  the 
range-dependent  case,  all  profiles  have  the  same  number  of  levels. 
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If  there  is  a  range-dependent  environment  (i.e.,  nprof  >  1),  horizontal  interpolation 
to  range  range  is  performed  between  the  two  neighboring  profdes  that  are  specified 
relative  to  mean  sea  level.  In  this  case  the  following  calculations  are  made.  If  range  is 
greater  than  the  range  for  the  next  refractivity  profile  rv 2,  then  the  index  j  (indicating  the 
range  of  the  previous  refractivity  profile)  is  set  equal  to  the  counter  for  the  range  of  the 
current  profile  is;  4  is  then  incremented  by  one.  Next,  the  range  of  the  previous 
refractivity  profile  rv  1  is  set  equal  to  rv 2,  and  rv 2  is  set  equal  to  the  range  of  the  4th  profile, 
rngprof  .  The  fractional  rang e/v  for  the  interpolation  is  given  by 


rv2  —rvx 

The  array  refdum,  containing  M-unit  values  for  the  current  (interpolated)  profile  and  the 
array  htdum  containing  height  values  for  the  current  (interpolated)  profile  are  determined 
from  referencing  the  FN_PLINT  function: 


refdum f  =  FN_PLINT(re/m.s7;V/ ,  refmslt  i  ,  /v);  /  =  1,2,3 r.dvlep 
htdum i  =  FN_PL I N T(hmsf . , hmslti  ,fv\i  =  1,2, 3 r.dvlep 


where  refmsl  and  hmsl  are  Two-dimensional  arrays  containing  refractivity  and  height, 
respectively,  with  respect  to  mean  sea  level  of  each  user-specified  profile. 

The  REMDUP  SU  is  referenced  to  remove  duplicate  refractivity  levels,  with  Ivlep 
being  the  number  of  points  in  the  profile  at  range  range.  The  PROFREF  SU  is  then 
referenced  to  adjust  the  new  profile  (i.e.,  refdum  and  htdum)  relative  to  the  internal 
reference  height  hminter,  corresponding  to  the  minimum  height  of  the  terrain  profile.  The 
PROFREF  SU  is  then  referenced  once  more  to  adjust  the  profile  relative  to  the  local 
ground  height  ycurm ,  and  upon  exit  from  the  PROFREF  SU,  the  INTPROF  SU  is 
referenced  to  interpolate  vertically  on  the  refractivity  profile  at  each  PE  mesh  height 
point.  This  results  in  the  n^-point  profile  array  profint  containing  the  interpolated  M-unit 
values  for  the  refractivity  at  range,  where  ny,  is  the  transform  size. 

Upon  exiting  the  REFINTER  SU,  rv  \  and  index  j  are  saved  for  use  upon  the  next 
reference  of  the  SU. 

Table  104  and  Table  105  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  REFINTER  SU  input  and  output  data  element. 
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Table  104.  REFINTER  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

h 

minter 

Minimum  height  of  terrain  profile 

meters 

TERINIT  SU 

hmsl 

Two-dimensional  array  containing  heights  with  respect  to 
mean  sea  level  of  each  profile.  Array  format  must  be  hmsljj 
=  height  of  zth  level  of  jth  profile.  j=\  for  range-independent 
cases 

meters 

Calling  CSCI 

is 

Counter  for  current  profile 

N/A 

REFINIT  SU 
REFINTER  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

Ivlp 

Number  of  height/refractivity  levels  in  profiles 

N/A 

Calling  CSCI 

M prof 

Number  of  refractivity  profiles 

N/A 

Calling  CSCI 

V'ange 

Range  for  profile  interpolation 

meters 

Calling  SU 

refmsl 

Two-dimensional  array  containing  refractivity  with  respect 
to  mean  sea  level  of  each  profile.  Array  format  must  be 
refmsljj  =  M-unit  at  zth  level  of  jth  profile.  j=\  for  range- 
independent  cases 

M-unit 

Calling  CSCI 

rngprof 

Ranges  of  each  profile,  rngprof  =  range  of  Ith  profile 

meters 

Calling  CSCI 

rv2 

Range  of  the  next  refractivity  profile 

meters 

REFINIT  SU 
REFINTER  SU 

y  cur m 

Height  of  ground  midway  between  last  and  current  PE  range 

meters 

PESTEP  SU 

Table  105.  REFINTER  SU  output  data  element  requirements. 


Name 

Description 

Units 

htdum 

Height  array  for  current  interpolated  profile 

meters 

is 

Counter  for  current  profile 

N/A 

Ivlep 

Number  of  height/refractivity  levels  in  profile  refdum  and  htdum 

N/A 

profint 

Profile  interpolated  to  every  A ZpE  in  height 

M-units 

refdum 

M-unit  array  for  current  interpolated  profile 

M-units 

rv2 

Range  of  the  next  refractivity  profile 

meters 

5.2.19  Ray  Optics  Calculation  (ROCALC)  SU 

The  ROCALC  SU  computes  the  RO  components  which  will  be  needed  (by  the 
ROLOSS  SU)  in  the  calculation  of  propagation  loss  at  a  specified  range  and  height  within 

the  RO  region.  These  components  are  the  magnitudes  for  a  direct-path  and  surface- 

2  2 

reflected  ray,  Fd  and  Fr  ,  respectively,  and  the  total  phase  lag  angle,  Q,  between  the 
direct-path  and  surface-reflected  rays. 
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The  RO  region  may  be  visualized  as  having  a  grid  of  points  superimposed  upon  it. 
The  grid  points  are  defined  at  the  intersection  of  a  series  of  lines  sloping  upward  from  the 
origin  and  a  series  of  vertical  lines  at  varying  ranges.  The  grid  point  counter  k  and  the 
vertical  lines  are  defined  at  varying  ranges,  two  of  which  are  represented  by  the  tenns 
xROp,  a  range  for  which  the  RO  calculations  were  previously  performed,  and  xROn,  the 
next  calculation  range. 

The  sloping  line  with  the  greatest  angle  (indicated  by  k  =  kmax)  is  a  function  of  the 
maximum  APM  output  height,  hty(nf,  adjusted  for  terrain  and  reference  heights,  and  the 
next  calculation  range.  The  sloping  line  with  the  least  angle  (indicated  by  k  =  kminp)  is  a 
function  of  the  height  at  the  top  of  the  PE  region  and  the  range  of  the  previous  RO 
calculations. 

The  following  steps  1  through  4  are  performed  while  the  current  range,  x,  is 
greater  than  xROir 

1.  The  terms  of  Table  106  (defined  in  Table  107)  are  initialized  or  updated  based  upon 
the  RO  calculation  range  counter  iROp.  If  iROp  equals  -1,  the  terms  are  initialized; 
otherwise,  the  tenns  are  updated.  Note  that  the  tenns  must  be  computed  in  the  order 
they  appear  in  the  table  to  insure  proper  values  are  assigned  to  component  terms. 


Table  106.  RO  region  indices,  angles,  and  ranges. 


For  iROp  =  -1  (initialize  terms) 


For  iROp  ^  -1  (update  terms) 


iROp  ~  1 
iROn  =  0 


iROp  : 
iROn 


1  -  iROp 
1-  iROn 


N/A 

■minp  =  0 


XROp  XROn 

b  .  _  P  . 

minp  —  mum 


kminn  —  0 
htydij  kilim  ~  Rfref 


Ja=MIN 


Am, 


-,.01745 


V 


kmax  8  8 


kminn  —  0 

N/A 

N/A 


r  iooo  ht>w) 

\ 

**«*=MIN 

88,  INT 

+  2 

V 

xROp  ) 

J 
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Table  106.  RO  region  indices,  angles,  and  ranges,  (continued) 


For  iROp  =  -1  (initialize  terms) 


fracRo  =  0 


fracR0  = 


For  iROp  ^  -1  (update  terms) 


f 

J 

f  .001  k  3 

\ 

MAX 

maX  ^ 

-1 

1 

V 

y  da  j 

J 

;  for  fracR0  <  .25 


N/A 

xROn  ~  x 


A xRO  ~  fracRO  xROp 
xROn  =  x  ROp  +  A* RO 


2.  To  calculate  the  RO  components  at  each  vertical  point  for  the  next  range,  xROn,  a  ray 
trace  within  a  Newton  iteration  method  is  used  to  find  a  direct-path  ray  and  a  surface- 
reflected  ray  which  will  both  originate  at  the  transmitter  height,  antref,  and  terminate 
at  the  same  grid  point,  zk.  The  results  of  the  iteration  are  examined  and  if  either  of  the 
rays  has  not  been  found,  an  adjustment  in  the  lower  boundary  of  the  RO  region  is 
made.  Following  the  conclusion  of  the  iterations,  the  antenna  pattern  factors  for  each 
ray  are  obtained,  a  surface  reflection  coefficient  for  the  surface-reflected  ray  is 
computed,  and  the  RO  components  are  calculated. 

Prior  to  all  calculations  for  each  vertical  point,  the  ray  trace  must  be  initialized  with 
beginning  direct-path  and  surface-reflected  ray  elevation  angles,  ad  and  an 
respectively;  and  derivatives  of  height  with  respect  to  these  elevation  angles,  dzdad 
and  dzdar.  A  starting  assumption  is  made  that  the  direct-path  ray  and  the  surface- 
reflected  rays  are  parallel  to  each  other.  Thus,  ad  is  initialized  as  0.001  kmax  and  ar  is 
initialized  as  -ad  .  The  RAYTRACE  SU  is  referenced  separately  with  ad  and  ar  to 
obtain  termination  elevation  angles,  J3d  and  /3r,  and  the  two  derivatives  of  range  with 
respect  to  elevation  angle,  dxdad  and  dxdar,  which  are  used  in  turn  to  compute  the 
needed  derivatives  of  height  with  respect  to  elevation  angle  given  as  -/3d  dxdad  and  -ft 
r  dxdar 

3.  Once  the  raytrace  has  been  initialized,  the  following  steps  3. a  through  3.g  are 
performed  for  each  vertical  grid  point,  zk,  beginning  with  k  =  kmax  and  subsequently 

decrementing  k  downward  while  k  remains  >  kminn.  Once  k  has  reached  zero, 
processing  continues  with  step  4  below. 

a.  The  termination  height  is  computed  as 


zk  =xROn  0.001  k 


where  k  is  the  grid  point  counter. 
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b.  The  Newton  iteration  method  to  find  the  direct  path  ray  from  antref  to  zk  is  started. 
This  iteration  is  continued  until  the  difference  between  the  ray  trace  ending  height 
zd  and  zk  is  less  than  a  height  difference  tolerance  zto/;  but  in  any  case,  no  more 
than  10  times.  The  direct-path  elevation  angle  is  given  as 


ccd  =  ad 


zd  zk 
dzdad 


where  zd  and  dzdad  are  obtained  from  the  ray  trace  initialization  of  step  2  above 
for  the  first  iteration  and  from  the  previous  iteration  for  subsequent  iterations. 

The  RAYTRACE  SU  is  referenced  and  a  new  dzdad  is  calculated  as  -/3d  dxdad. 
This  new  dzdad  is  examined  and  if  it  is  less  than  1(T6,  or  if  the  ray  type  flag  ilype  , 
returned  from  the  RAYTRACE  SU,  indicates  the  ray  has  reflected,  the  lower 
boundary  of  the  RO  region  is  adjusted  by  setting  kminn  equal  to  one  more  than  k 
and  the  iteration  for  the  direct  ray  is  stopped. 

c.  The  Newton  iteration  method  to  find  the  surface-reflected  ray  from  antref  to  zk  is 
now  started.  This  iteration  should  be  continued  until  the  difference  between  the 
ray  trace  ending  height,  zr  and  zk  is  less  than  a  height  difference  tolerance  ztok  but 
in  any  case,  no  more  than  10  times.  The  reflected-path  elevation  angle  is  given  as 


1  dzdar 

where  zr  and  dzdar  are  obtained  from  the  ray  trace  initialization  of  step  2  above 
for  the  first  iteration  and  from  the  previous  iteration  for  subsequent  iterations. 

The  RAYTRACE  SU  is  referenced  and  a  new  dzdar  is  calculated  as  dxdar. 
This  new  dzdar  is  examined  and  if  it  is  less  than  1 0-6  or  if  ilype  indicates  the  ray  is 
a  direct  ray,  the  lower  boundary  of  the  RO  region  is  adjusted  by  setting  kminn 
equal  to  one  more  than  k  and  the  iteration  for  the  surface-reflected  ray  is  stopped. 

d.  A  test  is  made  to  determine  if  the  grazing  angle,  if/,  (returned  from  the 
RAYTRACE  SU)  is  less  than  the  limiting  value,  y/lim,  and  if  so,  the  lower 
boundary  of  the  RO  region  is  adjusted  by  setting  kminn  equal  to  k. 
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e. 


The  magnitudes  for  the  direct-path  and  surface-reflected  ray,  Fd  and  Fr 
respectively,  are  now  given  as 


Fd 2 


X 


ROn 


dzdar, 


Fr2  = 


1  ROn 


dzda,. 


[f{a,)Rmag\ 


where  the  amplitude  of  the  surface  reflection  coefficient,  Rmag,  is  obtained  from  a 
reference  to  the  GETREFCOEF  SU;  the  antenna  pattern  factors  ffaj  and  f(ar)  are 
obtained  from  references  to  the  ANTPAT  SU;  and  the  derivatives  of  height  with 
respect  to  elevation  angle  are  obtained  from  the  RAYTRACE  SU  within  the 
Newton  iteration  of  steps  3.b  and  3.c  above. 

f.  The  total  phase  lag  between  the  direct-path  and  surface-reflected  rays  is  computed 
as 

fi  =  {plr-Pld)ko  +<P’ 

where  the  ray  path  lengths  pld  and  plr  are  obtained  from  the  RAYTRACE  SU 
within  the  Newton  iteration  of  steps  3.b  and  3.c  above;  the  reflection  coefficient 
phase  lag  angle,  cp ,  is  obtained  from  a  reference  to  the  GETREFCOEF  SU;  and  k0 
is  the  free-space  wave  number. 

g.  If  the  propagation  angles  and  factors  are  to  be  computed  for  each  separate  ray 
(lang  =  ‘.true.’),  then  the  current  propagation  angles  for  the  direct  and  reflected 
rays,  J3d  and  J3r  respectively,  are  stored  in  arrays  ROr/du  and  ROaref. 


4.  if  the  point  counter  k  has  been  reduced  to  zero  by  the  procedures  of  steps  3. a  through 
3.g  above,  the  surface  values  of  magnitudes  for  the  direct-path  and  surface-reflected 
rays  are  both  set  equal  to  the  last  value  of  Fd  and  the  total  phase  lag  between  the 
direct-path  and  surface-reflected  rays  is  set  equal  to  -n.  if  vertical  polarization  has 
been  specified,  then  a  further  calculation  is  performed  for  the  special  case  when  the 
RO  output  height  is  less  than  0  due  to  the  height  adjustment  of  y/,e/.  A  FE  calculation 
is  made  at  this  lowest  height  and  replaces  the  previous  values  of  magnitudes  for  the 
direct  and  surface-reflected  paths,  along  with  a  new  phase  lag. 

Table  107  and  Table  108  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ROCALC  SU  input  and  output  data  element. 
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Table  107.  ROCALC  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Cliltref 

Transmitting  antenna  height  relative  to  the  reference  height 
h 

•  iminter 

meters 

TERINIT  SU 

{J'bwr 

Antenna  vertical  beamwidth 

radians 

Calling  CSCI 

da 

Pbwr 

radians 

ROCALC  SU 

fracRo 

RO  range  interval  fraction  (0.0  to  0.25) 

N/A 

ROCALC  SU 

htlim 

Maximum  height  relative  to  hminter 

meters 

TERINIT  SU 

fotydif 

fotlim  ~  yfref 

meters 

ROCALC  SU 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

1  ROn 

Array  index  for  next  range  in  RO  region 

N/A 

ROCALC  SU 

iROp 

Array  index  for  previous  range  in  RO  region 

N/A 

APMINIT  CSC 
ROCALC  SU 

ko 

Free-space  wave  number 

meters"1 

APMINIT  CSC 

k 

n'imnn 

Array  index  for  minimum  angle  in  RO  region  at  range  Xro,, 

N/A 

ROCALC  SU 

lang 

Propagation  angle  and  factor  output  flag 

‘.true.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and 
factors 

N/A 

Calling  CSCI 

y^lim 

Grazing  angle  of  limiting  ray 

radians 

APMINIT  CSC 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

X 

Current  range 

meters 

Calling  SU 

XROn 

Next  range  in  RO  region 

meters 

APMINIT  CSC 

XROp 

Previous  range  in  RO  region 

meters 

ROCALC  SU 

yfref 

Ground  elevation  height  at  source 

meters 

APMINIT  CSC 

zoutma 

Array  output  heights  relative  to  “real”  antref 

meters 

APMINIT  CSC 

zoutpa 

Array  output  heights  relative  to  “image”  antref 

meters 

APMINIT  CSC 

zro 

Array  of  output  heights 

meters 

APMINIT  CSC 

Z,ol 

Height  tolerance  for  Newton's  method 

meters 

APMINIT  CSC 

Table  108.  ROCALC  SU  output  data  element  requirements. 


Name 

Description 

Units 

da 

y  Mbwr 

radians 

AxRO 

RO  range  interval 

meters 

Fd2 

Magnitude  array,  direct  ray 

N/A 

Fr 2 

Magnitude  array,  reflected  ray 

N/A 
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Table  108.  ROCALC  SU  output  data  element  requirements,  (continued) 


Name 

Description 

Units 

fracRo 

RO  range  interval  fraction  (0.0  to  0.25) 

N/A 

h  tydif 

1 

•1 

meters 

iROn 

Array  index  for  next  range  in  RO  region 

N/A 

iROp 

Array  index  for  previous  range  in  RO  region 

N/A 

k 

•^max 

Array  index  for  maximum  angle  in  RO  region  at  range  Xpon 

N/A 

k 

rvminn 

Array  index  for  minimum  angle  in  RO  region  at  range  Xpon 

N/A 

k 

rvminp 

Array  index  for  minimum  angle  in  RO  region  at  range  Xp()p 

N/A 

n 

Total  phase  angle  array 

radian 

ROa.dir 

Array  of  propagation  angles  for  direct  rays 

radians 

ROaref 

Array  of  propagation  angles  for  reflected  rays 

radians 

XROn 

Next  range  in  RO  region 

meters 

XROp 

Previous  range  in  RO  region 

meters 

5.2.20  Ray  Optics  Loss  (ROLOSS)  SU 

The  ROLOSS  SU  calculates  propagation  factor  and  loss  values  at  all  valid  RO 

heights  at  a  specified  range  based  upon  the  components  of  magnitude  for  a  direct-path 

2  2 

and  surface-reflected  ray,  Fd  and  Fr  respectively,  and  the  total  phase  lag  angle,  f2, 
between  the  two  rays  as  determined  by  the  ROCALC  SU. 

Upon  entering  the  SU,  the  ROCALC  SU  is  referenced  to  obtain  the  current  values 
of  the  direct  and  reflected  ray  magnitudes,  along  with  the  phase  lag  for  all  heights  at  the 
specified  range  rout. 

For  computational  efficiency,  an  interpolation  from  the  magnitude  and  total  phase 
lag  angle  arrays  established  by  the  ROCALC  SU  is  made  to  obtain  these  three  quantities 
at  each  APM  vertical  output  mesh  point  within  the  RO  region. 

From  the  interpolated  phase  lag  angle  and  ray  magnitudes,  a  propagation  factor  is 
calculated  that  is  used  in  turn  with  the  free-space  propagation  loss  to  obtain  a  propagation 
loss  at  each  vertical  APM  output  point. 

A  range  ratio  term  to  be  used  within  the  interpolation  scheme  is  defined  as 

, .  rout  ~  XROp 

ratio  = - — . 

At 

lsa'RO 

The  phase  lag  angle  and  ray  magnitude  arrays  have  been  filled  at  grid  points 
defined  by  a  series  of  sloping  lines  and  the  next  and  previous  RO  calculation  range,  xROn 
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and  xROp,  respectively.  Which  values  to  interpolate  from  are  determined  by  the  sloping 
line  immediately  above  and  the  sloping  line  immediately  below  the  current  APM  output 
point  of  interest.  To  begin  the  calculations  klo  is  initialized  to  kmax,  the  line  with  the 
greatest  angle. 

Perfonn  steps  1  through  6,  decrementing  downward  in  APM  output  points  from 
the  maximum  output  height  index  in  the  RO  region,  jmax,  to  the  minimum  output  height 
index,  in  the  RO  region,  jmin-\,  where  the  index  j  varies  from  jmax  to  jmin- 1 . 


1.  Interpolation  of  FcC ,  Fr  ,  and  Q  values  occurs  in  two  stages.  The  first  stage  is 
horizontally,  above  and  below  the  APM  output  point  (i.e.,  along  the  lines  kia  and  k/u). 
These  values  will  be  used  in  turn,  in  a  vertical  interpolation  stage  to  obtain  values  at 
the  APM  output  point  itself.  It  may  be  however,  that  more  than  one  APM  output  point 
will  fall  between  two  adjacent  k  lines.  In  this  case,  it  would  be  redundant  to  perform 
the  horizontal  interpolation  more  than  once.  For  this  reason,  a  temporary  k  line 
counter  is  established  that  will  be  used  in  comparison  with  ki0  to  detennine  if 
interpolation  is  necessary  or  if  the  previously  interpolated  horizontal  values  may 
again  be  used  in  the  vertical  interpolation.  This  temporary  k  counter  is  given  by 


Kemp  =  INT 


1 000  zro , 


' out  J 


where  j  is  the  APM  output  point  counter,  and  zroj  is  the  /h  output  height  point .  If  the 
index  j  has  already  reached  the  lowest  value  of jmin- 1  and  clutter  calculations  are  to  be 
performed,  then  the  height  at  which  to  compute  the  propagation  factor  is  replaced 
with  zc,  a  height  of  1  m  above  the  surface,  which  is  done  by  replacing  zroj  above  with 
the  adjusted  height  zc-yfXf.  If  ktemp  is  less  than  the  current  k/0,  the  APM  output  point 
occurs  below  the  current  lower  k  line  and  horizontal  interpolations  must  be  performed 
using  steps  l.a  through  l.c;  otherwise,  the  horizontal  interpolations  are  unnecessary 
and  the  SU  may  proceed  with  step  2. 


a.  The  lower  k  line,  ki0,  is  reset  to  ktemp  and  the  upper  k  line,  km,  is  set  to  one  more 
than  kio. 

b.  In  preparation  for  the  interpolation,  component  terms  (horizontal  differences  of 
direct  and  surface-reflected  magnitudes  and  phase  lag  angles)  along  the  ki0  and  km 
lines  are  given  as 


A Fdfo: 

(N  ., 

2 

ii 

-  Fd;  k  , 

ROn  ’  lo 

lROp'klo 

A Frl 

=  Fr;  , 

-Frf  k  , 

ROn  'hlo 

lROp'klo 

A--Io  = 

:  Q  k 

—  £2  ^  , 

ROn’  lo 

ROp’  lo 
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and  similarly,  the  propagation  angles  for  the  direct  and  reflected  rays  are  given  as 


A<  ^Oa^M-ROa^Ho) 
Aaf'io  =ROanf{iR(M'l!lo)-ROa^'Uo)  ’ 


if  Icing  =  ‘.true.’,  substituting  the  index  kiu  for  ki0  as  appropriate.  Note  that  these 
horizontal  differences  need  only  be  calculated  while  khi  and  ki0  remain  greater 
than  or  equal  to  kminp  and  kminn  .  If  these  conditions  are  not  met,  any  continued 
difference  calculations  would  take  place  within  the  PE  region,  which  would  yield 
undesirable  results.  For  failure  of  these  conditions,  the  previously  calculated 
difference  values  are  used  for  the  lower  RO  region  boundary  calculations. 

c.  If  kio  is  greater  than  or  equal  to  kminp  ,  the  horizontally  interpolated  direct  and 
surface-reflected  magnitudes  and  phase  lag  angles  along  the  klo  line  can  proceed 
in  a  forward  manor  (from  xROp  to  rout).  These  values  are  given  as 


Fdl  =  Fdf  +  ratio  AFd?a , 

ROp’  lo 

Fp  =  FP  k  +  ratio  ^Frl  ’ 

10  'ROp ’Klo  10 

nio=niD„,k,  +  ratio  AQ/0, 

ROp  lo 

adlo  =  ROa  ,  ,  -l -ratio  Aad,  , 

dir{iROp'klo  ) 

ar,n=ROa  ,  +  ratio  Aarh. 

ref{iROP’klo] 


if  lang=  .’true.’. 


In  a  like  manor,  the  same  equations  above  are  used  to  get  the  values  along  the  khi 
line  by  substituting  the  index  khi,  assuming,  however,  khi  is  also  greater  than  or 
equal  to  kminp.  Should  klo  or  khi  be  less  than  kminp,  the  interpolation  must  proceed 
in  a  backward  manner  (from  xROn  to  rout).  The  above  equations  may  again  be  used 
by  substituting  the  index  iROn  for  iROp  and  the  value  (1  -  ratio )  for  ratio. 

2.  Once  the  horizontal  interpolation  of  magnitudes  and  phase  lag  angles  has  been 
accomplished,  the  vertical  interpolation  of  magnitudes  and  phase  lag  angles  at  the 
APM  output  point  may  proceed  as 

Fd2  =  Fdl  +  ratio k  {Ftp  -  Fdfo ), 

Fr2  =  Fp0  +  ratio k  (pp  -  Fp ), 

Q.  =  Q.,o  +  ratiok{flhi-Q.Io), 
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and  again,  if  separate  values  for  the  direct  and  reflected  rays  are  desired  ( lang  = 
‘.true.’),  these  are  given  by 


adir  =adio  +  ratio  k(ocdhi- otd  lo ), 
a  ref  =  ari„  +  ratio k  (arhi  -  arIo ). 


Where  ration  from  klo  to  khi  is 


1000  zro : 

ratio k  = - —  -  klo . 

r 

out 


3.  From  the  magnitudes  of  the  direct  and  surface-reflected  components  and  the  phase  lag 
angle,  the  square  of  the  propagation  factor  at  the  APM  output  point  is  given  as 


F2  = 


Fd2  +Fr2  +2 


Fd  Fr 


COS  Q 


which  in  turn  is  converted  to  a  propagation  factor  expressed  in  decibels  by 

-iologio[max(f2,i(t25]]. 

4.  Next,  if  clutter  calculations  are  to  be  performed  and  the  j  index  has  reached  its  lowest 
value,  then  the  propagation  factor  is  stored  in  the  array  ffatlm. 

5.  The  total  propagation  loss  and  propagation  factor  is  then  computed  at  the  /h  APM 
output  point  and  converted  to  centibels  according  to 

LdB  =  fit istp  ~  Fjb  +  g™  loss  > 

F dB  =  fShslp  —  ^dB  ’ 

mPfl\,j  =  NINT(l  0  LdB ) , 

=  NINT(l  0  FdB  ) , 

where  fslistp  is  the  free  space  loss  at  the  istpth  output  range. 
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6.  Lastly,  if  the  propagation  angles  and  factors  for  the  direct  and  reflected  rays  are 
desired,  these  are  stored  separately  according  to 

propaf j  =adir, 
propaf 2  ,  =10  LOG10  {FcI 2 ), 
propaf y  =aref, 
propaf 4j  =  1 0  LOGin(/7/-2  ), 

Table  109  and  Table  1 10  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  ROLOSS  SU  input  and  output  data  element.  Table  111 
identifies  terms  that  are  used  internal  to  the  ROLOSS  SU  and  whose  value  must  be 
retained  from  SU  call  to  SU  call  for  reasons  of  computational  efficiency. 


Table  109.  ROLOSS  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

C,ut 

Logical  flag  used  to  indicate  if  surface  clutter  calculations 
are  desired. 

N/A 

Calling  CSCI 

Axro 

RO  range  interval 

meters 

ROCALC  SU 

Fd2 

Magnitude  array,  direct  ray 

N/A 

ROCALC  SU 

Fr2 

Magnitude  array,  reflected  ray 

N/A 

ROCALC  SU 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

APMINIT  CSC 

gClS  loss 

Gaseous  absorption  loss  at  range  rout 

dB 

APMSTEP  CSC 

hlim 

Array  containing  the  height  at  each  output  range  separating 
the  RO  region  from  the  PE  (at  close  ranges)  and  XO  (at  far 
ranges)  regions 

meters 

FILLHT  SU 

iROn 

Array  index  for  next  range  in  RO  region 

N/A 

ROCALC  SU 

iROp 

Array  index  for  previous  range  in  RO  region 

N/A 

ROCALC  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

J  max 

Array  index  for  maximum  output  height  in  RO  region 

N/A 

Calling  SU 

J  min 

Array  index  for  minimum  output  height  in  RO  region 

N/A 

Calling  SU 

k 

^ max 

Array  index  for  maximum  angle  in  RO  region  at  range  xRon 

N/A 

ROCALC  SU 

k 

^ minn 

Array  index  for  minimum  angle  in  RO  region  at  range  Xro„ 

N/A 

ROCALC  SU 

k  ■ 

*v minp 

Array  index  for  minimum  angle  in  RO  region  at  range  Xrop 

N/A 

ROCALC  SU 

lang 

Propagation  angle  and  factor  output  flag 

‘.true.’=  Output  propagation  angle  and  propagation  factor 

for  direct  and  reflected  ray  (where  applicable). 

‘.false.’  =  Do  not  output  propagation  angles  and  factors 

N/A 

CALLING  CSCI 

n 

Total  phase  angle  array 

radians 

ROCALC  SU 
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Table  109.  ROLOSS  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

lang 

Propagation  angle  and  factor  output  flag 

‘.true.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and 
factors 

N/A 

Calling  CSCI 

Q 

Total  phase  angle  array 

radians 

ROCALC  SU 

ROddir 

Array  of  propagation  angles  for  direct  rays 

radians 

ROCALC  SU 

ROaref 

Array  of  propagation  angles  for  reflected  rays 

radians 

ROCALC  SU 

out 

Current  output  range 

meters 

Calling  SU 

%ROp 

Previous  range  in  RO  region 

meters 

ROCALC  SU 

yfref 

Ground  elevation  height  at  source 

meters 

APMINIT  CSC 

Zc 

Height  at  which  to  compute  propagation  factor  for  clutter 
calculations  relative  to  hmref 

meters 

APMINIT  CSC 

zro 

Array  of  output  heights  in  RO  region 

meters 

APMINIT  CSC 

Table  110.  ROLOSS  SU  output  data  element  requirements. 


Name 

Description 

Units 

mpfl 

Propagation  factor  and  loss  array 

cB 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and  factors  for  the  direct 

dB, 

and  reflected  rays  (where  applicable)  for  all  output  height/range  points 

radians 

Table  111.  ROLOSS  SU  save  data  element  requirements. 


Name 

Description 

Units 

Source 

A  adu 

Difference  in  the  direct  ray  angle  along  the  RO  step  above  the 
desired  point 

radians 

ROLOSS  SU 

A  adl0 

Difference  in  the  direct  ray  angle  along  the  RO  step  below  the 
desired  point 

radians 

ROLOSS  SU 

Aar ’hi 

Difference  in  the  reflected  ray  angle  along  the  RO  step  above 
the  desired  point 

radians 

ROLOSS  SU 

A  arlo 

Difference  in  the  reflected  ray  angle  along  the  RO  step  below 
the  desired  point 

radians 

ROLOSS  SU 

^--hi 

Difference  in  total  phase  lag  angle  along  AxRO  above  desired 
APM  output  point 

radians 

ROLOSS  SU 

A  Qfo 

Difference  in  total  phase  lag  angle  along  AxRO  below  desired 
APM  output  point 

radians 

ROLOSS  SU 

A Fdl 

Difference  in  direct  ray  magnitude  along  AxR0  below  desired 
APM  output  point 

N/A 

ROLOSS  SU 
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Table  111.  ROLOSS  SU  save  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

A Fdl 

Difference  in  direct  ray  magnitude  along  Axro  above  desired 
APM  output  point 

N/A 

ROLOSS  SU 

*Frl 

Difference  in  reflected  ray  magnitude  along  Axro  below 
desired  APM  output  point 

N/A 

ROLOSS  SU 

*Fr2hi 

Difference  in  reflected  ray  magnitude  along  Axro  above 
desired  APM  output  point 

N/A 

ROLOSS  SU 

5.2.21  Save  Profile  (SAVEPRO)  SU 

The  SAVEPRO  SU  stores  the  gradients  and  heights  of  the  current  refractivity 
profile,  upon  each  reference  to  the  FZLIM  SU,  from  the  top  of  the  PE  calculation  region 
to  the  maximum  user-specified  height. 

Upon  entering,  the  current  profile  height  array  htdum  is  searched  to  find  the  index 
i  such  that  htdunij  is  the  first  height  in  the  profile  that  is  greater  than  the  maximum  PE 
calculation  height,  z/„„.  The  counter  lnew  is  then  initialized  to  -1. 

Next,  the  gradients  are  calculated  and  stored,  along  with  corresponding  heights,  as 

follows 


grcidLetvjz  = 


refdumj+l 

htdumj+l 


refdumj 

htdunij 


htr )  iz  =  htdunij , 


where  j  is  incremented  by  one  from  i  to  lvlep-l,  lnew  is  incremented  by  one  with  each 
increment  in  j,  and  iz  represents  the  range  step  index  for  XO  calculations. 

Before  exiting,  the  last  height  level  in  htdum  is  stored  and  the  final  number  of 
levels,  lnew,  in  the  izlh  profile  (represented  by  grad  and  htr)  is  stored  in  array  Ivl. 

Table  1 12  and  Table  1 13  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  SAVEPRO  SU  input  and  output  data  element. 
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Table  1 1 2.  SAVEPRO  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

htdum 

Height  array  for  current  profile 

meters 

REFINTER  SU 

iz 

Number  of  calculation  range  steps  for  XO  region 

N/A 

FZLIM  SU 

Ivlep 

Number  of  height/refractivity  levels  in  profile  refdum  and 
htdum 

N/A 

REFINTER  SU 

refdum 

M-unit  array  for  current  profile 

M-units 

REFINTER  SU 

^lim 

Maximum  height  in  PE  calculation  region 

meters 

FFTPAR  SU 

Table  113.  SAVEPRO  SU  output  data  element  requirements. 


Name 

Description 

Units 

grad 

Two-dimensional  array  containing  gradients  of  each  profile  used  in  XO 

M-units 

calculations 

/meter 

htr 

Two-dimensional  array  containing  heights  of  each  profile  used  in  XO  calculations 

meters 

Ivl 

Number  of  height  levels  in  each  profile  used  in  XO  calculations 

N/A 

5.2.22  Spectral  Estimation  (SPECEST)  SU 

The  SPECEST  SU  determines  the  outward  propagation  angle  at  the  top  of  the  PE 
calculation  region,  or  the  grazing  angle  at  the  lower  part  of  the  PE  region,  and  the 
propagation  angle  for  all  desired  output  receiver  points  within  the  PE  region  based  on 
spectral  estimation.  The  outward  propagation  angle  is  used  for  XO  calculations  and  the 
grazing  angle  is  used  for  rough  surface  calculations.  All  other  propagation  angles  are 
stored  in  propaf  and  returned  to  the  calling  CSCI. 

Upon  entering  the  SPECEST  SU,  if  the  outward  propagation  angle  is  to  be 
determined  {iflag  =  0),  the  topmost  np  points  (within  the  unfdtered  portion)  of  the  complex 
PE  field  are  separated  into  their  real  and  imaginary  components,  xp  and  yp,  respectively. 
If  the  grazing  angle  is  to  be  determined  (i) iag  =  1),  then  the  lowest  np  points  of  the 
complex  PE  field  are  used.  A  window  filter  is  then  applied  to  both  real  and  imaginary 
component  arrays  by  multiplying  each  element  in  xp  and  yp  by  each  corresponding 
element  in  the  filter  array  filtp  for  indices  between  %  np  and  np. 

Next,  the  array  elements  in  xp  and  yp  are  set  to  0  for  indices  from  nP+ 1  to  n  - 1. 
[Note  that  both  xp  and  yp  are  arrays  of  size  ns .]  The  DRST  SU  is  then  referenced  to 
obtain  the  spectral  field  components. 

The  spectral  amplitudes  in  dB  are  then  given  by 


specif  =10  LOG 


10 


MAX  10 


-10 


4 


*p?  +  yp? 


i  =  0,l,2,...,n  -1 . 
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Next,  a  3-point  average  is  performed  on  spectr  to  determine  the  bin,  or  index  ipeak, 
at  which  the  peak  spectral  amplitude  occurs.  Once  ipec,k  has  been  determined,  the  outward 
propagation  angle  is  calculated  as 


»out=  SIN 


-l 


Xi 


peak 


2nsAzPE  J 


Table  1 14  and  Table  115  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  SPECEST  SU  input  and  output  data  element. 


Table  114.  SPECEST  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Azps 

PE  mesh  height  increment  (bin  width  in  z-space) 

meters 

FFTPAR  SU 

flltp 

Array  filter  for  spectral  estimation  calculations 

N/A 

APMINIT  CSC 

iflag 

Flag  indicating  if  spectral  estimation  is  to  be  performed 
on  lower  PE  field  or  upper  PE  field 

0  =  upper  PE  field 

1  =  lower  PE  field 

N/A 

Calling  SU 

J^lim 

PE  bin  #  corresponding  to  z/!m,  i.e.,  Z/im  =jzum  AzPe 

N/A 

APMINIT  CSC 

lnp 

Power  of  2  transform  size  used  in  spectral  estimation 
calculations;  i.e.,  np  =  2 lnP 

N/A 

APMINIT  CSC 

np34 

%  np 

N/A 

APMINIT  CSC 

np 

Number  of  bins  in  upper  PE  region  to  consider  for 
spectral  estimation. 

N/A 

APMINIT  CSC 

ns 

Transform  size  for  spectral  estimation  calculations 

N/A 

APMINIT  CSC 

U 

Complex  field  at  current  PE  range  r 

|iV/m 

PESTEP  SU 

XO  con 

Constant  used  in  determining  &out 

N/A 

APMINIT  CSC 

ycur 

Height  of  ground  at  current  range  r 

meters 

PESTEP  SU 
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Table  115.  SPECEST  output  data  element  requirements. 


Name 

Description 

Units 

spectr 

Spectral  amplitude  of  field 

dB 

&out 

Outward  propagation  angle  at  top  of  PE  region 

radians 

xp 

Real  part  of  spectral  portion  of  PE  field 

pV/m 

yp 

Imaginary  part  of  spectral  portion  field 

pV/m 

5.2.23  Surface  Impedance  (SURFIMP)  SU 

The  SURFIMP  SU  computes  the  complex  normalized  surface  impedance  for 
rough  sea  surface  conditions,  given  the  wind  speed  and  the  frequency.  The  SURFIMP  SU 
implements  a  modified  version  Sailors  (1997)  of  the  original  Barrick  (1971a,  1971b) 
model  for  the  nonnalized  rough  sea  surface  impedance  for  HF  frequencies. 

The  SU  begins  by  converting  the  internal  wind  speed  input  variable,  ws,  from 
meters/second  to  knots  using  the  conversion: 

ws(knots)  =  1.94  rv.s'(m/s). 

The  SU  then  populates,  from  internal  DATA  statements,  real  polynomial 
coefficient  arrays  appropriate  to  the  real  ( conslr ,  cons2r,  cons3r,  cons4r,  cons5r )  and 
imaginary  ( consli ,  cons2i,  cons3i,  cons4i,  cons5i )  parts  of  the  complex  normalized 
surface  impedance.  The  arrays  appropriate  for  the  real  part  of  the  normalized  impedance 
are  then  passed,  in  five  sequential  function  calls,  along  with  the  wind  speed,  to  the 
FN  POLY5  SU  for  the  determination  of  the  five  polynomial  coefficients  required  for 
input  to  the  FN  POLY4  SU.  The  polynomial  coefficients  returned  from  the  sequential 
FN_POLY5  SU  calls  are  stored  in  the  constr  array  variable  which  is  then  passed  to  the 
FN_POLY4  SU,  along  with  the  frequency  /mhz,  for  detennination  of  the  real  part  of  the 
complex  normalized  rough  sea  surface  impedance,  <fr. 

This  process  is  then  repeated,  passing  the  appropriate  coefficient  arrays  ( consli , 
cons2i,  cons3i,  cons4i,  cons5i)  along  with  the  wind  speed  variable  to  the  FN_POLY5  SU 
for  detennination  of  the  polynomial  coefficients  for  FN  POLY4.  These  coefficients  are 
then  passed  to  the  FN_POLY4  SU,  along  with  the  frequency  Jmhz,  for  detennination  of 
the  imaginary  part  of  the  normalized  rough  sea  surface  impedance,  <f,-. 

The  output  of  the  SURFIMP  SU  is  the  double  precision  complex  normalized 
rough  sea  surface  impedance  given  by 
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Table  1 16  and  Table  1 17  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  SURFIMP  SU  input  and  output  data  element. 

Table  116.  SURFIMP  input  data  element  requirements. 


Name 

Description 

Units 

Source 

ws 

Wind  speed 

meters/second 

Calling  SU 

J MHz 

Frequency 

MHz 

Calling  SU 

Table  117.  SURFIMP  output  data  element  requirements. 


Name 

Description 

Units 

C 

Normalized  rough  sea  surface  impedance 

N/A 

5.2.24  Troposcatter  (TROPOSCAT)  SU 

The  TROPOSCAT  SU  calculates  the  loss  due  to  troposcatter  at  and  beyond  the 
radio  horizon  for  an  array  of  receiver  heights. 

Upon  entering  the  TROPOSCAT  SU,  the  current  output  range  rout  is  updated,  and 
the  surface  refractivity  and  associated  variables  are  also  initialized.  The  surface 
refractivity  snref  is  initialized  according  to 


snref  =  j  (snref tx  +  snref  ) . 


A  term  used  in  the  troposcatter  transmission  loss  calculation,  sn\,  is  detennined  from 
sni  =  0.031  -  0.00232  snref  +  5.67  x  1CT6  sntJ , 

along  with  a  loss  tenn  tlsts  for  smooth  surface  as 

tlsts  =  list wr  -  2snref . 


Next,  the  tangent  angle  from  the  source  to  the  surface,  9\,  is  initialized  to  its  value 
for  smooth  surface,  &\s.  If  performing  a  terrain  case  (fter  =  ‘.true.’),  the  index  ja  is 
initialized  where  the  first  occurance  of  the  condition  jtlArPE  >rout  is  met.  The  index  jti  is 

set  equal  to  the  index  location  within  &\t,  up  to  jt2- 1,  where  the  minimum  value  occurs. 
The  tangent  angle  from  the  source  height  <9\  is  then  initialized  to  L91  Z/;/  and  the 
corresponding  range  di  is  initialized  jtiArPE. 
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For  each  output  height  index  j  from  js  to  je,  the  following  steps  are  perfonned: 


1.  If  running  a  smooth  surface  case  (fer  =  ‘.false.’)  and  rout  is  less  than  the  minimum 
range  rdtj  at  which  diffraction  field  solutions  are  applicable  for  the  current  height, 
then  the  index  is  iterated  until  the  loop  is  exited.  Otherwise,  the  SU  program  flow 
continues  with  step  2. 

2.  The  function  FNGETTLOSS  is  referenced  to  determine  the  troposcatter  loss  and 
returns  the  total  loss  for  each  height  zoutj.  The  total  loss  is  then  stored  in  array  rloss. 

If  receiver  heights  relative  to  the  local  ground  are  specified,  then  steps  1  to  2 
above  are  also  perfonned  for  all  heights  in  zout  rtg  from  1  to  nzout_rtg  with  appropriate 
initialization  of  angle  and  height  variables  before  referencing  FN  GET  TLOSS.  The 
final  loss  values  are  then  stored  in  array  rloss_rtg. 

Table  118  and  Table  1 19  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  TROPOSCAT  SU  input  and  output  data  element. 


Table  118.  TROPOSCAT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

adif 

Height  differences  between  ««!,,,/ and  all  output  receiver 
heights 

meters 

TROPOINIT  SU 

d2s 

Array  of  tangent  ranges  for  all  output  receiver  heights  over 
smooth  surface 

meters 

TROPOINIT  SU 

Ar pe 

PE  range  step 

meters 

PEINIT  SU 

ek 

Effective  earth’s  radius  factor 

N/A 

GETK  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
‘.true.’  =  terrain  profile  specified 
‘.false.’  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

h 

minter 

Minimum  height  of  terrain  profile 

meters 

TERINIT  SU 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

je 

Ending  receiver  height  index  at  which  to  compute 
troposcatter  loss 

N/A 

Calling  SU 

js 

Starting  receiver  height  index  at  which  to  compute 
troposcatter  loss 

N/A 

Calling  SU 

jt2 

Index  counter  for  tyh  array  indicating  location  of  receiver 
range 

N/A 

TROPOINIT  SU 
APMSTEP  CSC 
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Table  118.  TROPOSCAT  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

rdt 

Array  of  minimum  ranges  at  which  diffraction  field 
solutions  are  applicable  (for  smooth  surface)  for  all  output 
receiver  heights. 

meters 

TROPOINIT  SU 

rloss 

Propagation  loss  array 

dB 

Calling  SU 

rlossrtg 

Propagation  loss  computed  relative  to  the  local  ground 
height  at  heights  specified  by  zout  rtg 

dB 

Calling  SU 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

snrefo 

Surface  refractivity  taken  from  the  refractivity  profile  with 
respect  to  mean  sea  level 

M-unit 

REFINIT  SU 

snrefx 

Surface  refractivity  at  transmitter 

M-unit 

REFINIT  SU 

90 

Array  of  angles  used  to  determine  common  volume 
scattering  angle 

radians 

TROPOINIT  SU 

&ls 

Tangent  angle  from  source  (for  smooth  surface) 

radians 

TROPOINIT  SU 

92s 

Array  of  tangent  angles  from  all  output  receiver  heights  - 
used  with  smooth  surface 

radians 

TROPOINIT  SU 

91 1 

Array  of  tangent  angles  from  source  height  -  used  with 
terrain  profile 

radians 

TROPOINIT  SU 

tlst  \xy 

Troposcatter  loss  term 

dB 

TROPOINIT  SU 

twoka 

Twice  the  effective  earth  radius 

meters 

GETK  SU 

y ground 

Height  of  the  surface  at  the  current  output  range  step 

meters 

Calling  SU 

zout 

Array  containing  all  desired  output  heights  referenced  to 

h  winter 

meters 

APMINIT  CSC 

zoutrtg 

Receiver  heights  specified  relative  to  the  local  ground 
height. 

meters 

Calling  CSCI 

Table  1 1 9.  TROPOSCAT  SU  output  data  element  requirements. 

Name 

Description 

Units 

rloss 

Propagation  loss  array 

dB 

rlossrtg 

Propagation  loss  computed  relative  to  the  local  ground  height  at  heights  specified  by 
zoutrtg 

dB 

5.3  EXTENDED  OPTICS  INITIALIZATION  (XOINIT)  CSC 

The  XOINIT  CSC  initializes  the  range,  height,  and  angle  arrays  in  preparation  for 
XO  calculations  and  to  reference  the  CLUTTER  SU  if  clutter  values  are  desired. 
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Upon  entering  the  XOINIT  CSC,  if  Ciut  is  ‘.true.’  the  CLUTTER  SU  is  referenced 
to  compute  the  clutter-to-noise  ratio  (CNR).  Next,  the  value  of  ixostp  is  tested.  If  ixostp  is 
equal  to  0,  then  the  APMCLEAN  SU  is  referenced  to  deallocate  all  arrays  used  in  the 
APM  application  and  the  CSC  is  exited.  If  ixostp  is  greater  than  0,  then  the  following 
procedure  is  performed. 

The  arrays  curang  and  curng,  used  for  storage  of  traced  local  angles  and  ranges, 
respectively,  are  allocated  and  initialized  to  the  range  and  angle  values  stored  in  ffacz. 
The  array  curht  is  allocated  and  initialized  to  the  height  of  the  top  of  the  PE  calculation 
region,  zn,n.  The  array  igrd,  used  for  storage  of  starting  refractivity  gradient  level  [at 
which  to  begin  ray  tracing],  is  allocated  and  initialized  to  0.  The  two-dimensional  array 
prfhxo,  containing  final  output  heights  and  propagation  factors,  along  with  the  dummy 
array  dum,  used  for  temporary  storage,  are  also  allocated  and  initialized  to  0. 

If fer  is  ‘.true.’,  then  the  MEANFILT  SU  is  referenced  twice  to  perform  a  9-point 
smoothing  operation  on  the  angle  values,  using  dum  for  temporary  storage  of  angles  after 
the  first  pass  smoothing  operation.  Next,  the  starting  height  index  at  which  to  begin  XO 
calculations,  jxstart  is  initialized  to  the  ending  height  index  for  PE  calculations,  jend,  plus 
one.  Finally,  dum  is  deallocated  before  exiting. 

Table  120  and  Table  121  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  XOINIT  CSC  input  and  output  data  element. 


Table  120.  XOINIT  CSC  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Clul 

Logical  flag  used  to  indicate  if  surface  clutter  calculations 
are  desired. 

N/A 

Calling  CSCI 

ffacz 

Array  containing  propagation  factor,  range,  and 
propagation  angle  at  z;,-m 

dB, 

meters, 

radians 

FZLIM  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been  specified: 
.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

Ixostp 

Current  output  range  step  index  for  XO  calculations 

N/A 

Calling  SU 

iz 

Number  of  propagation  factor,  range,  angle  triplets  stored 
in  ffacz 

N/A 

FZLIM  SU 
APMINIT  CSC 

l^max 

Maximum  number  of  points  allocated  for  arrays  associated 
with  XO  calculations 

N/A 

APMINIT  CSC 

J  end 

Ending  index  within  mpfl  of  PE  loss  values 

N/A 

Calling  SU 

^lim 

Height  limit  for  PE  calculation  region 

meters 

GETTHMAX  SU 
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Table  121.  XOINIT  CSC  output  data  element  requirements. 


Name 

Description 

Units 

CNR 

Array  of  clutter-to-noise  ratio  values 

dB 

curang 

Array  of  current  local  angles  for  each  ray  being  traced  in  XO  region 

radians 

curht 

Array  of  current  local  heights  for  each  ray  being  traced  in  XO  region 

meters 

cumg 

Array  of  current  local  ranges  for  each  ray  being  traced  in  XO  region 

meters 

terror 

Error  flag 

N/A 

igrd 

Integer  indexes  indicating  at  what  refractive  gradient  level  to  begin  ray  tracing 
for  next  XO  range  step  for  each  ray  in  XO  region. 

N/A 

Jxstart 

Starting  index  within  mpfl  of  XO  loss  values 

N/A 

prfhxo 

Two-dimensional  array  of  propagation  factor  and  heights  for  each  ray  traced 
in  XO  region  to  range  rout 

dB.meters 

5.3.1  APM  Clean  (APMCLEAN)  SU 

The  APMCLEAN  SU  deallocates  all  dynamically  dimensioned  arrays  used  in  one 
complete  run  of  APM  calculations. 

Upon  entry,  all  arrays  that  were  dynamically  allocated  at  the  beginning  of  the 
current  application  are  now  deallocated. 

Table  122  and  Table  123  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  APMCLEAN  SU  input  and  output  data  element. 


Table  122.  APMCLEAN  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

adif 

Height  array  used  for  troposcatter  calculations 

meters 

TROPOINIT  SU 

curang 

Array  of  current  local  angles  for  each  ray  being 
traced  in  XO  region 

radians 

EXTO  SU 
XOINIT  CSC 

curht 

Array  of  current  local  heights  for  each  ray  being 
traced  in  XO  region 

meters 

EXTO  SU 
XOINIT  CSC 

cumg 

Array  of  current  local  ranges  for  each  ray  being 
traced  in  XO  region 

meters 

EXTO  SU 
XOINIT  CSC 

d2s 

Array  of  tangent  ranges  for  all  output  receiver 
heights  over  smooth  surface 

meters 

TROPOINIT  SU 

dielec 

Two-dimensional  array  containing  the  relative 
permittivity  and  conductivity;  dielec\j  and 
dielecoj-  respectively. 

N/A,  S/m 

Calling  CSCI, 
DIEINIT  SU 

envpr 

Complex  [refractivity]  phase  term  array 
interpolated  every  AzPE  in  height 

N/A 

PEIN1T  SU 
PESTEP  SU 
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Table  122.  APMCLEAN  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

ffacz 

Array  containing  propagation  factor,  range,  and 
propagation  angle  at  Z/im 

dB, 

meters, 

radians 

FZLIM  SU 

ffatlm 

Propagation  factor  array  computed  at  1  m  above 
the  surface. 

dB 

CALCLOS  SU, 
FEDR  SU, 

FEM  SU, 
ROLOSS  SU 

ffrout 

Array  of  propagation  factors  at  each  output 
range  beyond  ratz  and  at  height  Z/,m 

dB 

CALCLOS  SU 

flit 

Cosine-tapered  (Tukey)  filter  array 

N/A 

PEINIT  SU 

filtp 

Array  filter  for  spectral  estimation  calculations 

N/A 

APMINIT  CSC 

firsp 

Complex  free  space  propagator  term  array 

N/A 

PEINIT  SU 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

APMINIT  CSC 

yc 

Dynamically  allocated  array  of  constants 
describing  the  backscattering  effectiveness  of 
the  surface 

dB 

Calling  CSCI 

yrng 

Dynamically  allocated  array  of  ranges 
corresponding  to  the  values  in  yc 

meters 

Calling  CSCI 

gr 

Intermediate  M-unit  gradient  array,  RO  region 

(M-unit/m)10"6 

REFINIT  SU 

grad 

Two-dimensional  array  containing  gradients  of 
each  profile  used  in  XO  calculations 

M-units 

/meter 

SAVEPRO  SU 

grdum 

Array  of  refractivity  gradients  defined  by  profile 
htdum  and  refdum 

M-units 

/meter 

REFINIT  SU 
REFINTER  SU 

hfangr 

Array  of  user-defined  cut-back  angles.  This  is 
used  only  for  user-defined  height-finder  antenna 
type. 

radians 

APMINIT  CSC 

hlim 

Array  containing  height  at  each  output  range 
separating  the  RO  region  from  the  PE  (at  close 
ranges)  and  XO  (at  far  ranges)  regions 

meters 

GETTHMAX  SU 

href 

Heights  of  refractivity  profile  with  respect  to  yref 

meters 

PROFINT  SU 

ht 

PE  mesh  height  array  of  size 

meters 

PEINIT  SU 

htdum 

Height  array  for  current  interpolated  profile 

meters 

REFINIT  SU 
REFINTER  SU 

htfe 

Array  containing  the  height  at  each  output  range 
separating  the  FE  region  from  the  RO  region 
(full  hybrid  mode),  or  the  FE  region  from  the  PE 
region  (partial  hybrid  mode) 

meters 

FILLHT  SU 

htr 

Two-dimensional  array  containing  heights  of 
each  profile  used  in  XO  calculations 

meters 

SAVEPRO  SU 

igrd 

Integer  indexes  indicating  at  what  refractive 
gradient  level  to  begin  ray  tracing  for  next  XO 
range  step  for  each  ray  in  XO  region. 

N/A 

XOINIT  CSC 
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Table  122.  APMCLEAN  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

igrnd 

Integer  array  containing  ground  type 
composition  for  given  terrain  profile  -  can  vary 
with  range.  Different  ground  types  are: 

0  =  seawater 

1  =  freshwater 

2  =  wet  ground 

3  =  medium  dry  ground 

4  =  very  dry  ground 

5  =  ice  at  -1  degree  C 

6  =  ice  at  -10  degree  C 

7  =  user-defined  (in  which  case,  values 
of  relative  permittivity  and  conductivity 
must  be  given). 

N/A 

Calling  CSCI 

Ivl 

Number  of  height  levels  in  each  profile  used  in 

XO  calculations 

N/A 

SAVEPRO  SU 

nc 2 

Array  of  complex  dielectric  constants 

N/A 

DIEINIT  SU 

prfhxo 

Array  of  propagation  factor  and  heights  for  each 
ray  traced  in  XO  region  to  range  rout 

dB,meters 

XOINIT  CSC 

profint 

Profile  interpolated  to  every  Azpe  in  height 

M-units 

REFINTER  SU 

W 

Array  of  interpolated  grazing  angles  at  each  PE 
range  step 

radians 

GRAZE1NT  SU 

q 

Intermediate  M-unit  difference  array,  RO  region 

2M-unit  10-6 

REFINIT  SU 

rdt 

Array  of  minimum  ranges  at  which  diffraction 
field  solutions  are  applicable  (for  smooth 
surface)  for  all  output  receiver  heights. 

meters 

TROPOINIT  SU 

refdum 

M-unit  array  for  current  interpolated  profile 

M-units 

REFINIT  SU 
REFINTER  SU 

refref 

Refractivity  profile  with  respect  to  yref 

M-units 

PROFINT  SU 

rfacl 

Propagation  factor  at  valid  output  height  points 
from  PE  field  at  range  f[ast 

dB 

CALCLOS  SU 

rfac2 

Propagation  factor  at  valid  output  height  points 
from  PE  field  at  range  r 

dB 

CALCLOS  SU 

rgrnd 

Array  containing  ranges  at  which  varying 
ground  types  apply. 

meters 

Calling  CSCI 

rlogo 

Array  containing  20  times  the  logarithm  of  all 
output  ranges 

N/A 

APMINIT  CSC 

rloss 

Propagation  loss 

dB 

ALLARRAY  APM 
CALCLOS  SU 
EXTO  SU 
TROPOSCAT  SU 

rlossrt 

g 

Propagation  loss  computed  relative  to  the  local 
ground  height  at  heights  specified  by  zout  rtg 

dB 

ALLARRAY  APM 
CALCLOS  SU 

TROPOSCAT  SU 

rm 

Intermediate  M-unit  array,  RO  region 

M-unit  10'6 

REFINIT  SU 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 
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Table  122.  APMCLEAN  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

rn 

Array  of  RT  to  the  i'h  power  (e.g.,  rn,  =  Rt) 

N/A 

GETALN  SU 

rsqrd 

Array  containing  the  square  of  all  desired  output 
ranges 

meters2 

APMINIT  CSC 

spectr 

Spectral  amplitude  of  field 

dB 

SPECEST  SU 

90 

Array  of  angles  used  to  determine  common 
volume  scattering  angle 

radians 

TROPOINIT  SU 

92s 

Array  of  tangent  angles  from  all  output  receiver 
heights  -  used  with  smooth  surface 

radians 

TROPOINIT  SU 

91 1 

Array  of  tangent  angles  from  source  height  - 
used  with  terrain  profile 

radians 

TROPOINIT  SU 

®rout 

Two-dimensional  array  containing  the 
propagation  angle  spectrally  estimated  from  PE 
at  nang  height  points  and  at  every  output  range 
step  rout 

radians 

RET  GRAZE  SU 

tang 

Tangent  of  angle  array  from  terrain  slopes. 

radians 

PEINIT  SU 

tyh 

Adjusted  height  points  of  terrain  profile 

meters 

PEIN1T  SU 

U 

Complex  PE  field 

pV/m 

PESTEP  SU 

udum 

Real  or  imaginary  part  of  complex  field  array 

pV/m 

FFT  SU 

Ulast 

Complex  PE  field  at  range  rlast 

pV/m 

PESTEP  SU 

w 

Difference  equation  of  complex  PE  field 

pV/m2 

PESTEP  SU 

xp 

Real  part  of  spectral  portion  of  PE  field 

pV/m 

SPECEST  SU 

ym 

Particular  solution  of  difference  equation 

pV/m 

PESTEP  SU 

yp 

Imaginary  part  of  spectral  portion  field 

pV/m 

SPECEST  SU 

zout 

Array  containing  all  desired  output  heights 
referenced  to  hminter 

meters 

APMINIT  CSC 

zoutma 

Output  height  point  relative  to  “real”  antref 

meters 

APMINIT  CSC 

zoutpa 

Output  height  point  relative  to  “image”  antref 

meters 

APMINIT  CSC 

zRO 

Array  of  output  heights  in  RO  region 

meters 

APMINIT  CSC 

zrt 

Intermediate  height  array,  RO  region 

meters 

REFINIT  SU 

zxo 

Height  of  the  ground  at  the  current  output  range 
step 

meters 

CALCLOS  SU 

Table  123.  APMCLEAN  CSC  output  data  element  requirements. 


Name 

Description 

Units 

l error 

Error  flag  indicator:  non-zero  if  error  has  occurred  in  deallocation  procedure 

N/A 
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5.3.2  Clutter-to-Noise  (CLUTTER)  SU 

The  CLUTTER  SU  calculates  the  returned  CNR  at  each  range  rout  based  on  the 
radar  range  equation. 

The  reflectivity  computed  for  that  portion  of  the  path  over  water  is  based  on  a 
modification  to  the  Georgia  Institute  of  Technology  (GIT)  model.  However,  the  GIT 
model  is  valid  for  frequencies  above  1  GHz.  Therefore,  for  paths  over  water  and  for 
frequencies  less  than  1  GHz,  the  reflectivity  is  determined  using  the  same  model  as  that 
over  land,  detailed  below. 


Upon  entering  the  SU  the  noise  power,  PN,  and  a  constant,  Con,  based  on  system 
parameters  and  used  in  the  radar  equation,  are  determined  according  to 


Con  =  10  LOGl0 

f 

Pn  =  \OLOGU) 


U1P-W%2G-L. 


M3 


4x10 


-15  A 


+  N„ 


where  r  is  the  system  pulse  length  in  microseconds,  Pt  is  the  transmitter  peak  power  in 
kW,  G  is  the  transmitting  antenna  gain  (transmitting  and  receiving  antenna  are  assumed 
to  be  equal),  Lsys,  is  the  assumed  system  loss,  and  Nf  is  the  noise  figure  in  dB. 

Other  constants  used  in  detennining  the  area  of  the  clutter  cell  are  computed  for 
subsequent  use  in  the  GIT  model  and  for  clutter  cross  section  model  used  over  land: 


AcGit 


0hb»Col 

2V2 


Acx,0W=c0rTAN^by(\ 

Acxhigh  =  n  TAN(^Z  )TAN(ehZ  )• 


Next,  if  any  of  the  path  is  over  water  and  the  frequency  is  greater  than  1  GHz, 
then  the  GIT  flag,  l git,  is  set  to  ‘.true.’  and  the  GIT  INIT  SU  (if  only  one  wind  speed  has 
been  specified)  and  the  SPMINIT  SU  are  referenced  to  initialize  all  necessary  variables 
used  in  computing  the  clutter  over  water. 

Next,  steps  1  through  9  are  performed  for  each  index  i  ranging  from  1  to  nrout- 
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1 .  The  grazing  angle,  y/r0ut,  and  range,  rout  are  initialized: 


Yrout=8rZ  -routi 

rou,  =  rngoutj 


If  the  current  range  corresponds  to  that  part  of  the  path  over  land  or  the  frequency  is 
less  than  1  GHz  (l git  =  ‘.false.’),  then  the  SU  continues  with  steps  2  through  3; 
otherwise,  the  SU  proceeds  with  steps  4  through  8. 

2.  The  area  of  the  clutter  cell,  Ac,  is  detennined  based  on  high  and  low  grazing  angle 
formulas: 


>  _  AcXlowrOU, 

/iClow  ~  ' 


cos(v„y 


.  Acxug,,rL 
Ac,.,  = 


SlHVrJ’ 

Ac  =  WLOGK(MlN(Achw,AchJ). 


3.  The  reflectivity,  or  clutter  cross  section  per  unit  area,  o°,  over  land  is  then  determined 
from 


^=^  +  10  LOGm[SIN(Vrcu,)}, 


where  igrc  is  the  index  counter  for  the  yc  array  at  the  current  range.  The  SU  then 
proceeds  to  step  9. 

4.  If  the  current  range  corresponds  to  that  portion  of  the  path  over  water,  then  the 
GIT  INIT  SU  is  referenced  if  more  than  one  wind  speed  has  been  specified.  The 
range  at  which  the  current  grazing  angle  occurs  for  a  standard  atmosphere  is  then 
determined  from 


rspm  'Jaekst  V rout  ekstanKef  a  eksW  rout' 


5.  The  propagation  factor  (in  dB)  for  a  standard  atmosphere  at  this  range,  Fspm,  is  then 
obtained  from  referencing  the  SPM  SU. 
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6.  Next,  several  variables  are  computed  for  use  in  computing  the  reflectivity: 


^ <p  ®  term  U  rout  1 


a,  = 


a,.  =e 


„  (l—2.8t//wut) 


where  <jterm  and  autenn  are  detennined  in  the  GIT  INIT  SU. 


7.  The  GIT  reflectivity,  <j°GIT  ,  is  then  computed  as 


a°H  =  1 OZOG10  (3.9x1  O'6  A^atauaw), 
orln+\.21LN(¥m,l+W‘) 


—  ()  _  _o  . 
°V  ~aH  + 


for  3000  <fMHz  <  10,000  MHz; 


cr°H  =  as  above , 


a°v  =cr0H+avm  +2A6LN(i//roul  +  10~4) 


for /mhz  <  3000  MHz; 


a°H  =  1 0  LOG,  0  (5.78  x  1 0"6y/OM7a;a,(aw), 
°v  = °h  +  <*vm  + 1  -3 1  LN(i//rout ) 


for  fMHz  >  10,000  MHz, 


<JGIT=aH  >  f°r  H  poll 

a°GiT=CTy  ,  for  V  pol, 

where  the  terms  aw  and  ovm-3  are  detennined  in  the  GIT_INIT  SU. 

8.  The  reflectivity  and  the  area  of  the  clutter  cell  for  over  water  paths  are  then  computed 
according  to 


cJ°=cr°GIT-2Fspm, 

Ac  =10  LOG10  {routAcGIT  ) . 


9.  The  return  clutter  power  at  the  current  range  rout  is  then  computed: 

C  =  Con  +  ct°  +  2  ffatlm,  +  AC-  40  LOG  w  (rout ) . 
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Once  the  clutter  power  has  been  computed  for  all  ranges  and  stored  in  an  array, 
the  clutter-to-noise  ratio  is  detennined  for  all  ranges  by  subtracting  the  noise  power: 

CNRj  =Ci-PN,  for  i  =  1,  2,  3,  . .  .nrout. 

Table  124  and  Table  125  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  CLUTTER  SU  input  and  output  data  element. 


Table  124.  CLUTTER  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

Q-ekst 

4/3  effective  earth’s  radius 

meters 

APMMOD 

ClTltref 

Transmitting  antenna  height  relative  to  hminter 

meters 

APMINIT  CSC 

J MH z 

Frequency  in  MHz 

MHz 

Calling  CSCI 

ffcitlm 

Propagation  factor  array  computed  at  1  m  above 
the  surface. 

dB 

CALCLOS  SU, 
FEDR  SU, 

FEM  SU, 

ROLOSS  SU 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

G 

Gain  of  transmit/receive  antennas 

dBi 

Calling  CSCI 

yc 

Dynamically  allocated  array  of  constants 
describing  the  backscattering  effectiveness  of 
the  surface 

dB 

Calling  CSCI 

yrng 

Dynamically  allocated  array  of  ranges 
corresponding  to  the  values  in  yc 

meters 

Calling  CSCI 

w 

J  rout 

Array  of  grazing  angles  at  each  output  range  rout 

radians 

RET  GRAZE  SU 

Igc 

Number  of  yc  values  for  a  particular  application 
of  APM 

N/A 

Calling  CSCI 

io 

Starting  index  for  mpfl  array: 

0  =  1st  calculated  output  point  is  at  surface 

1  =  1st  calculated  output  point  is  at  height 

Az0ui 

N/A 

APMINIT  CSC 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

N/A 

Calling  CSCI 

A 

Wavelength 

meters 

APMINIT  CSC 

Lsys 

Miscellaneous  system  losses 

dB 

Calling  CSCI 

/4h7 

Antenna  vertical  beamwidth 

radians 

APMINIT  CSC 

Nf 

Noise  figure 

dB 

Calling  CSCI 

Wrout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

nw 

Number  of  wind  speeds 

N/A 

Calling  CSCI 

p, 

Transmitter  peak  power 

kW 

Calling  CSCI 
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Table  124.  CLUTTER  SU  input  data  element  requirements,  (continued) 


Name 

Description 

Units 

Source 

rlogo 

Array  containing  20  times  the  logarithm  of  all 
output  ranges 

dB 

APMINIT  CSC 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

ruf 

Logical  flag  indicating  if  rough  sea  surface 
calculations  are  required 

‘.true.’  =  perform  rough  sea  surface 
calculations 

‘.false.’  =  do  not  perform  rough  sea  surface 
calculations 

N/A 

APMINIT  CSC 

dhbw 

Antenna  horizontal  beam  width 

radians 

APMINIT  CSC 

r 

Pulse  length/width 

/«ec 

Calling  CSCI 

yfref 

Ground  elevation  height  at  source 

meters 

APMINIT  CSC 

Zc 

Height  at  which  to  compute  propagation  factor 
for  clutter  calculations  relative  to  hmre/ 

meters 

APMINIT  CSC 

Table  125.  CLUTTER  SU  output  data  element  requirements. 


Name 

Description 

Units 

CNR 

Clutter-to-noise  ratio  array 

dB 

5.3.3  Diffraction  Loss  (FN_DLOSS)  Function 

The  FN  DLOSS  function  computes  the  diffraction  region  loss  based  on  the  CCIR 
model.  Please  refer  to  Hitney  et  al.  (1984)  for  a  complete  description. 

5.3.4  Get  Theta  (GETTHETA)  SU 

The  GETTHETA  SU  computes  the  optical  phase-lag  difference  angle  based  on 
the  reflection  range.  Please  refer  to  Hitney  et  al  (1984).  for  a  complete  description. 

5.3.5  GIT  Initialization  (GITJNIT)  SU 

The  GIT  INIT  SU  initializes  all  variables  used  in  the  calculation  of  the 
reflectivity  based  on  the  GIT  model. 

Upon  entering  the  SU,  the  wind  speed,  cos,  at  the  current  range  is  detennined  by 
referencing  the  FN_CURWIND  function.  Next,  the  average  wave  height,  havg,  and  wind 
direction  are  initialized  according  to 

f  r,  A2-5 

h  =  0)5 
avg  U-67J  ’ 

cod  =winddir(y(80). 


191 


The  following  tenns  used  in  determining  the  upwind/downwind  factor,  a,„  and 
wind  speed  factor,  aw,  are  then  computed: 


^,=1.1^  + 0.0 15)-0'4, 

auterm  =0.2COS(®rf)(A  +  0.015)04 


for /mhz  <  10000; 


qw=  1.93  r004, 
aU,„=0,25COS(tt.J)A-OJ! 


for  fMHz>  10000. 


Finally,  the  wind  speed  factor  and  several  variables  used  in  computing  the 
reflectivity  are  detennined: 


(  Y" 

1.94  a)s 


avm  =22.2  +  3.76LN(T)-1.73LN(/?avg  +  0.015) 
oVH2  =9.7  +  1 .09  LN(/l)-l  .05  LN(/?avg  +  0.015) 

(7VH3  =18.55  +  3.43  LN(T)-1.38LN(/?avg). 

Table  126  and  Table  127  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  GIT  INIT  SU  input  and  output  data  element. 


Table  126.  GITJNIT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

j. MHz 

Frequency  in  MFiz 

MHz 

Calling  CSCI 

A 

Wavelength 

meters 

APMINIT  CSC 

nw 

Number  of  wind  speeds 

N/A 

Calling  CSCI 

rngwind 

Ranges  of  wind  speeds  entered:  rngwindj 
=  range  of  i,h  wind  speed 

meters 

Calling  CSCI 

rout 

Current  output  range 

meters 

Calling  SU 

wind 

Array  of  wind  speeds 

m/s 

Calling  CSCI 

winddir 

Angle  between  antenna  boresight  and 
upwind  direction 

degrees 

Calling  CSCI 

VL 


1  + 


CO „ 


1 5.4 


(l4.4/L  +  5.5)Afl 
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Table  127.  GITJNIT  SU  output  data  element  requirements. 


Name 

Description 

Units 

GUterm 

Term  in  computing  the  upwind/downwind  factor 

N/A 

aw 

Wind  speed  factor 

N/A 

G term 

Term  used  in  computing  the  GIT  reflectivity 

N/A 

G  VH1-3 

Terms  used  in  computing  the  GIT  reflectivity 

N/A 

5.3.6  GofZ  (GOFZ)  Function 

The  GOFZ  function  computes  the  diffraction  region  height-gain  in  decibels,  based 
on  the  CCIR  diffraction  model.  Please  refer  to  Hitney  et  al.(1984)  for  a  complete 
description. 

5.3.7  Mean  Filter  (MEANFILT)  SU 

The  MEANFILT  SU  performs  a  /sz-point  average  smoothing  operation  on  the 
array  passed  to  it. 

The  array  arbef  is  passed  to  the  SU,  along  with  the  number  of  points  over  which 
to  perform  the  smoothing  operation,  isz.  Once  the  smoothing  operation  has  been 
performed,  the  resulting  “smoothed”  points  are  stored  in  araft  and  passed  back  to  the 
calling  routine.  The  operation  is  performed  as  follows: 

1  k+m' 

araft k  =  - —  ^  arbef)  for  k  =  m '  +  1,  m '  +  2,  m  -  m ' , 

lsz  i=k—m' 

where  m  'is  !4(4z  -1)  and  m  is  the  size  of  the  array  arbef 

Table  128  and  Table  129  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  MEANFILT  SU  input  and  output  data  element. 


Table  128.  MEANFILT  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

arbef 

Array  of  angles  before  smoothing  operation 

radians 

Calling  SU 

Isz 

Number  of  points  over  which  to  perform  average  smoothing 

N/A 

Calling  SU 

m 

Size  of  array  arbef 

N/A 

Calling  SU 

Table  129.  MEANFILT  SU  output  data  element  requirements. 


Name 

Description 

Units 

araft 

Array  of  angles  after  smoothing  operation 

radians 
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5.3.8  Optical  Region  Limit  (OPLIMIT)  SU 

The  OPLIMIT  SU  calculates  the  maximum  range  in  the  optical  region  and  the 
corresponding  loss  at  that  range.  Please  refer  to  Hitney  et  al.  (1984)  for  a  complete 
description. 

5.3.9  Optical  Difference  (OPTICF)  SU 

The  OPTICF  SU  calculate  the  optical  path-length  difference  angle  by  solving  a 
cubic  equation  for  the  reflection  point  range.  Please  refer  to  Hitney  et  al.  (1984)  for  a 
complete  description. 

5.3.10  R1  Iteration  (R1ITER)  SU 

The  R1ITER  SU  finds  the  range  of  the  reflection  point  corresponding  to  a 
particular  launch  angle.  Please  refer  to  Hitney  et  al.  (1984)  for  a  complete  description. 

5.3.11  Standard  Propagation  Model  Initialization  (SPMJNIT)  SU 

The  SPM  INIT  SU  initializes  many  of  the  variables  used  throughout  the  SPM 
SU.  Please  refer  to  Hitney  et  al.  (1984)  for  a  complete  description. 

5.3.12  Standard  Propagation  Model  (SPM)  SU 

The  SPM  SU  computes  the  propagation  factor  for  a  standard  atmosphere  only, 
with  the  assumption  of  omnidirectional  antenna  patterns.  Please  refer  to  Hitney  et  al. 
(1984)  for  a  complete  description. 


5.4  EXTENDED  OPTICS  STEP  (XOSTEP)  CSC 

The  XOSTEP  CSC  calculates  the  propagation  loss  in  the  XO  region  for  one 
output  range  step. 

Upon  entering  the  XOSTEP  CSC,  the  current  execution  mode  is  checked  to 
determine  if  XO  calculations  will  be  necessary  (i hybrid  *  0).  If  hybrid  is  0,  then  the  CSC  is 
exited. 


If  hybrid  is  not  equal  to  0,  the  output  range  rout,  and  the  gaseous  absorption  loss 
gasioss  are  updated.  The  mpfl  values  are  initialized  to  -32767  from  the  index  of  the  start  of 
XO  calculations,  jxstart,  to  the  maximum  number  of  height  output  points,  nzout.  The  EXTO 
SU  is  then  referenced  to  calculate  propagation  factor  and  loss  values  in  the  XO  region. 
Propagation  factor  and  loss  values  are  returned  in  mpfl  from  index  jxslart  to  jxe. 

If  FE  and  RO  calculations  need  to  be  performed  {hybrid  =  1),  then  the  indices  j/s 
and  jfe,  indicating  the  height  index  at  which  to  start  and  end  FE  calculations,  respectively, 
are  determined.  The  FEM  SU  is  then  referenced  to  compute  propagation  factor  and  loss 
values  for  heights  zoutifs  to  zoufe.  Similarly  for  RO  calculations,  the  indices  jrs  and  jre  are 
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determined,  and  the  ROLOSS  SU  is  referenced  to  compute  propagation  factor  and  loss 
values  for  heights  zoutj ■  to  zoutjre. 

Finally,  the  index  jxenci  is  set  equal  to  the  maximum  of  jxe,  jfe,  and  jre.  If  the  last 
range  value  has  been  reached  (istp  =  nrout),  then  the  APMCLEAN  SU  is  referenced  to 
deallocate  all  arrays  allocated  for  the  APM  application. 

Table  130  and  Table  131  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  XOSTEP  CSC  input  and  output  data  element. 


Table  130.  XOSTEP  CSC  input  data  element  requirements. 


Name 

Description 

Units 

Source 

gasatt 

Gaseous  absorption  attenuation  rate 

dB/km 

GASABS  SU 

htfe 

Array  containing  the  height  at  each  output  range  separating 
the  FE  region  from  the  RO  region  (full  hybrid  mode),  or  the 

FE  region  from  the  PE  region  (partial  hybrid  mode) 

meters 

FILLHT  SU 

h  tnm 

Maximum  height  relative  to  hminter 

meters 

TERINIT  SU 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  pure  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

N/A 

APMINIT  CSC 

Istp 

Current  output  range  step  index 

N/A 

Calling  CSCI 

Jxstari 

Index  at  which  valid  propagation  factor  and  loss  values  in 
mpfl  start 

N/A 

Calling  CSCI 

W-zout 

Integer  number  of  output  height  points  desired 

N/A 

Calling  CSCI 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

zout 

Array  containing  all  desired  output  heights  referenced  to 
h  ■ 

•  lminter 

meters 

APMINIT  CSC 

Table  131.  XOSTEP  CSC  output  data  element  requirements. 


Name 

Description 

Units 

gCIS  loss 

Loss  due  to  gaseous  absorption 

dB 

Jxend 

Index  at  which  valid  propagation  factor  and  loss  values  in  mpfl  end 

N/A 

mpfl 

Propagation  factor  and  loss  array 

cB 

out 

Current  desired  output  range 

meters 
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5.4.1  Extended  Optics  (EXTO)  SU 

The  EXTO  SU  calculates  propagation  factor  and  loss  based  on  XO  techniques. 
The  SU  performs  a  ray  trace  on  all  rays  within  one  output  range  step  and  returns  the 
propagation  factor  and  loss  up  to  the  necessary  height;  storing  all  angle,  height,  and  range 
information  for  subsequent  ray  tracing  upon  the  next  reference  to  the  SU. 


Upon  entering  the  SU,  internal  one-line  ray  trace  functions  are  defined  as 

RADAl(a,6)=a2  +2grdb, 

RP(a,6)=aH — — , 

&  rd 

AP (a,b)=a+bgrd  , 

b2—c 2 

HP  (a,b,c)=a-\ - . 

^ Srd 


Next,  the  starting  and  ending  index  counters  izs,  ize,  respectively,  for  the  local 
angle,  range,  and  height  arrays;  and  the  refractivity  profile  starting  index  irps  are 
initialized  to  1  for  the  first  reference  to  the  EXTO  SU.  The  index  ize  is  then  determined 
such  that  cumgiZe  <  rout  <  curngiZe+\.  The  integer  counter  k,  indicating  the  number  of 
propagation  factor  and  heights  in  array prfhxo,  is  initialized  to  0. 

Ray  trace  steps  1  through  3  are  perfonned  for  each  ray;  i.e.,  for  each  /h  angle, 
range,  and  height  triplet,  for  j  ranging  from  izs  to  ize. 

1 .  At  the  start  of  the  ray  trace,  the  current  local  angle  (ao),  range  (r0),  height  (ho),  and 
refractive  gradient  index  (igmd)  are  initialized  to  curangj ,  curngj,  curhtj,  and  igrdj, 
respectively.  Next,  refractive  profile  index,  irp,  is  initialized  to  the  maximum  of  j  or 
i,pS.  Finally,  the  refractivity  gradient,  gr(j  is  set  equal  to  the  gradient  at  the  Ura/’  level 
of  the  irpth  profile,  gradigmd,irp-  Ray  trace  steps  l.a  through  l.d  are  then  perfonned  until 
the  current  local  range  ro  becomes  greater  than  or  equal  to  rout. 

a.  The  ending  range,  r\,  in  the  ray  trace  segment  is  set  equal  to  the  minimum  of 
Jfaczirp+ 1>2  or  rout.  If  irp  is  equal  to  the  number  of  stored  triplets,  iz,  then  rx  is  set 
equal  to  rout. 

b.  The /h  ray  is  then  traced  to  r\  and  the  resulting  angle  and  height  at  the  end  of  the 
segment  is  determined  via  the  in-line  functions  as 

ax  =  AP(a0,q  -  r0) , 

K  =  HP  (h0,ax,a0). 
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c.  The  ending  height  h\  is  then  compared  to  the  next  height  level  in  the  current 
refractivity  profile,  hfri  d+\j  and  if  h\  is  greater  than  this  height  level,  it  is  set 

equal  to  htrigmd+  i;I-  and  a  new  ti\  and  r\  are  computed  from 

ax  =  ^RADAl(a0,/2,  -  h0) 
h  =  RP(v«i  -  «o) 

igmd  is  then  set  to  the  minimum  of  igrac&  1  or  lvlirp- 1 . 

d.  The  starting  angle,  range,  and  height  for  the  next  ray  trace  segment  is  updated, 
and  if  necessary,  the  refractivity  profile  index  irp  is  updated  to  the  minimum  of 
irp+ 1  or  ize.  Steps  l.a  through  l.d  are  then  repeated  for  the  next  ray  segment. 

2.  Once  the  ray  has  been  traced  to  a  range  of  rout  or  greater,  the  current  angle,  range,  and 
height  arrays,  curang,  curng,  and  curht,  respectively,  are  updated  to  the  values  for  ao, 
r o,  and  ho  for  subsequent  references  to  the  EXTO  SU. 

3.  The  counter  k  for  the  propagation  factor  and  height  array  is  incremented  by  one  and 
the  array  is  updated  according  to 


prjhxok  i  =ffaczj  X , 
prfhxok  2  =h0 . 

Once  all  rays  have  been  traced,  the  starting  profile  index  irps  is  updated  to  ize  for 
the  next  reference  to  the  EXTO  SU,  and  the  counter  k  is  again  incremented  by  one  and 
the  last  values  of prfhxo  updated  as  follows, 

prfhxok  X  =  ffroati  p , , 
prfhxo k  2  =ffroutiip  2 . 

The  number  of  traced  XO  height  points,  nxo,  at  the  current  output  range  is  then  set  to  k. 
Note  that  at  this  point,  all  output  heights  in  prfhxo 0:nxo,2  are  decreasing  from  prfhxo  \  .2  to 
prfhxo „xo2  and  all  traced  heights  in  curht  are  decreasing  from  curhtiZs  to  curhti=e. 

The  starting  index  izs  is  then  adjusted  [for  the  next  reference  to  the  EXTO  SU]  if 
the  topmost  traced  height  curhtiZs  is  greater  than  htn,n.  If  perfonning  a  terrain  case,  the 

output  height  points  may  not  be  continually  decreasing  from  prfhxo\ 2  to  prfhxo nxop  In 
this  case,  prfhxo  is  sorted  such  that  all  height  values  are  steadily  decreasing.  The  ending 
index,  jxe,  at  which  XO  propagation  factor  and  loss  values  will  be  calculated  and  stored 
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in  mpfl,  is  set  equal  to  nzout  and  adjusted,  if  necessary,  such  that  zoutixe  is  less  than 

prfhxoxj..  Now,  the  counter  index  ix  is  initialized  to  nxo.  Next,  the  propagation  factor  is 
determined  via  linear  interpolation  on  the  values  in  prfhxo.  Steps  1  through  2  are 
performed  for  each  output  height  point  zoutj  for  j  varying  from  jxs  to  jxe. 

1 .  The  counter  ix  is  adjusted  (if  necessary)  such  that  prfhxo  ixi  <  zoutj  <  prfhxo  ix-\  a- 


2.  The  propagation  factor  (_ FdB ),  propagation  loss  floss),  and  propagation  angle 
( propafj )  at  height  zoutj  are  then  calculated  according  to 

zoutj  -  prfhxo  2 

jrac= - , 

prfhxoix_  12  -  prfhxoa2 

Fjb  =  FN_PLINf/;r//2A-qvl ,  prfhxo^,  frac), 
rlossj  =fsli)p  -FdB, 

propafj  =  FN_PLINf/;r//2A-qv3 ,  prfhxoix  13 ,  frac) . 


Once  all  propagation  loss  values  have  been  computed,  the  TROPOSCAT  SU  is 
referenced  to  compute  troposcatter  loss,  if  necessary.  Finally,  the  loss  due  to  gasesous 
absorption  is  added  to  rloss  and  then  converted  to  centibels  and  stored  in  mpfl  before 
exiting. 


Table  132  and  Table  133  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  EXTO  SU  input  and  output  data  element.  Table  134 
identifies  terms  that  are  used  internal  to  the  EXTO  SU  and  whose  value  must  be  retained 
from  SU  call  to  SU  call  for  reasons  of  computational  efficiency. 
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Table  132.  EXTO  SU  input  data  element  requirements. 


Name 

Description 

Units 

Source 

curang 

Array  of  current  local  angles  for  each  ray  being  traced  in  XO 
region 

radians 

EXTO  SU 
XOINIT  CSC 

curht 

Array  of  current  local  heights  for  each  ray  being  traced  in  XO 
region 

meters 

EXTO  SU 
XOINIT  CSC 

curng 

Array  of  current  local  ranges  for  each  ray  being  traced  in  XO 
region 

meters 

EXTO  SU 
XOINIT  CSC 

ffacz 

Array  containing  propagation  factor,  range,  and  propagation 
angle  at  z/,m 

dB, 

meters, 

radians 

FZLIM  SU 

ffrout 

Array  of  propagation  factors  at  each  output  range  beyond  ratz 
and  at  height  Z/im 

dB 

CALCLOS  SU 

fsl 

Free  space  loss  array  for  output  ranges 

dB 

APMINIT  CSC 

fer 

Logical  flag  indicating  if  terrain  profde  has  been  specified: 

.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

N/A 

APMINIT  CSC 

§ClSioss 

Gaseous  absorption  loss  at  range  rout 

dB 

APMSTEP  CSC 

grad 

Two-dimensional  array  containing  gradients  of  each  profile 
used  in  XO  calculations 

M-units 

/meter 

SAVEPRO  SU 

hlim 

Array  containing  height  at  each  output  range  separating  the 

RO  region  from  the  PE  (at  close  ranges)  and  XO  (at  far 
ranges)  regions 

meters 

GETTHMAX  SU 

h  tnm 

Maximum  height  relative  to  hmi„ter 

meters 

TERINIT  SU 

htr 

Two-dimensional  array  containing  heights  of  each  profile 
used  in  XO  calculations 

meters 

SAVEPRO  SU 

igrd 

Integer  indexes  indicating  at  what  refractive  gradient  level  to 
begin  ray  tracing  for  next  XO  range  step  for  each  ray  in  XO 
region. 

N/A 

XOINIT  CSC 

Iratz 

Index  of  output  range  step  in  which  to  begin  storing 
propagation  factor  and  outgoing  angle  for  XO  region 

N/A 

APMINIT  CSC 

Istp 

Current  output  range  step  index 

N/A 

Calling  SU 

T 

x  ropo 

Troposcatter  calculation  flag: 

‘. false. ’=  no  troposcatter  calcs 
‘.true.’  =  troposcatter  calcs 

N/A 

Calling  CSCI 

iz 

Number  of  propagation  factor,  range,  angle  triplets  stored  in 

ffacz 

N/A 

FZLIM  SU 

Jxs 

Index  at  which  valid  loss  values  in  mpfl  start 

N/A 

Calling  SU 

Ivl 

Number  of  height  levels  in  each  profile  used  in  XO 
calculations 

N/A 

SAVEPRO  SU 

n:0ut 

Integer  number  of  output  height  points  desired 

N/A 

Calling  CSCI 

r out 

Current  output  range 

meters 

Calling  SU 

ZOlit 

Array  containing  all  desired  output  heights  referenced  to 
h 

minter 

meters 

APMINIT  CSC 

zxo 

Height  of  the  ground  at  the  current  output  range  step 

meters 

CALCLOS  SU 
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Table  133.  EXTO  SU  output  data  element  requirements. 


Name 

Description 

Units 

curang 

Array  of  current  local  angles  for  each  ray  being  traced  in  XO  region 

radians 

curht 

Array  of  current  local  heights  for  each  ray  being  traced  in  XO  region 

meters 

curng 

Array  of  current  local  ranges  for  each  ray  being  traced  in  XO  region 

meters 

hlirn 

Array  containing  height  at  each  output  range  separating  the  RO 
region  from  the  PE  (at  close  ranges)  and  XO  (at  far  ranges)  regions 

meters 

igrd 

Integer  indexes  indicating  at  what  refractive  gradient  level  to  begin 
ray  tracing  for  next  XO  range  step  for  each  ray  in  XO  region 

N/A 

Jxe 

Index  at  which  valid  loss  values  in  mpfl  end 

N/A 

mpfl 

Two-dimensional  propagation  factor  and  loss  array 

cB 

prfhxo 

Two-dimensional  array  of  propagation  factor  and  heights  for  each 
ray  traced  in  XO  region  to  range  rou, 

dB. meters 

propaf 

Two-dimensional  array,  containing  the  propagation  angles  and 
factors  for  the  direct  and  reflected  rays  (where  applicable)  for  all 
output  height/range  points 

radians,  N/A 

rloss 

Propagation  loss 

dB 

Table  134.  EXTO  SU  save  data  element  requirements. 

Name 

Description 

Units 

If'ps 

Starting  index  counter  for  refractivity  profiles 

N/A 

ize 

Ending  index  in  curang,  curng ,  and  curht  to  trace  to  rout 

N/A 

izs 

Starting  index  in  curang,  curng,  and  curht  to  trace  to  rou, 

N/A 

5.5  Return  Grazing  Angle  (RET_GRAZE)  CSC 

The  RET  GRAZE  CSC  interpolates  grazing  angles  to  every  output  range  step 
rout,  and  if  propagation  angles  are  desired  everywhere  (king  =  ‘.true.’),  the  SU  will  also 
interpolate  the  propagation  angles  in  height  at  every  output  range. 


Upon  entering  the  SU,  if  lang  =  ‘.true.’,  the  two-dimensional  array  ©rout,  is 
allocated  and  initialized.  0rout  will  contain  all  the  interpolated  propagation  angles  at  each 
output  height  and  every  output  range. 

For  every  output  range  rngoutj  where  i  varies  from  1  to  nrout,  steps  1  through  2  are 
performed: 


200 


1.  The  grazing  angle  at  the  current  output  range  is  determined  by  referencing 
FN  PLINT: 


,P„„,  =FN_PLINT('P,„'P,s1,x), 


where 


is  =  INT 


frngout  ^ 

V  ^ rPE  J 


ispl  =  MIN(/.s’  + 1,  iPE ), 
rngout;  -isArgrz 


x  = 


A  r 


If  lang  =  ‘.true.’,  then  the  SU  continues  with  step  2;  otherwise,  step  1  is  repeated  for 
all  values  of  i  to  nmut. 

2.  Parameters  in  calculating  all  propagation  angles  at  the  current  output  range  are 
determined  according  to 


7>  =  INT 


f  .  \ 

rngouti 


A  r, 


sr-  J 


ipp  1  =  M I N  (//?  +  1 ,  igPE  ) , 
ragout,  ~ipArgrz 


x  = 


A  r 


The  propagation  angles  are  then  determined  for  all  values  of  in  from  1  to  nang  by 
referencing  FN_PLINT : 


0  =FN  PLINT(@  ,x). 

routin.i  ~  \  Pin, ip ’  Pin,ipp\ ’  / 


If  the  current  value  of  0p  lies  outside  the  PE  calculation  region  (value  =  -999),  i  is 
incremented  and  step  2  is  repeated  for  the  next  output  range. 

Finally,  array  0p  is  deallocated  before  exiting. 

Table  135  and  Table  136  provide  identification,  description,  units  of  measure,  and 
the  computational  source  for  each  RET  GRAZE  CSC  input  and  output  data  element. 
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Table  135.  RET_GRAZE  CSC  input  data  element  requirements. 


Name 

Description 

Units 

Source 

.1 

PE  range  step  used  for  calculation  of  grazing  angles 

meters 

APMINIT  CSC 

Ar pE 

PE  range  step 

meters 

PEINIT  SU 

h PE 

Number  of  grazing  angles  computed  from  spectral  estimation 

N/A 

GET  ANGLES  SU 

ipE 

Number  of  PE  range  steps 

N/A 

PEINIT  SU 

lang 

Propagation  angle  and  factor  output  flag 

‘.tme.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and  factors 

N/A 

Calling  CSCI 

ftang 

Number  of  points  in  the  vertical  at  which  to  spectrally 
estimate  propagation  angles. 

N/A 

GET  ANGLES  SU 

ft  rout 

Integer  number  of  output  range  points  desired 

N/A 

Calling  CSCI 

rngout 

Array  containing  all  desired  output  ranges 

meters 

APMINIT  CSC 

W 

Array  of  interpolated  grazing  angles  at  each  PE  range  step 

radians 

GRAZE  INT  SU 

0 

P 

Two-dimensional  array  containing  the  propagation  angle 
estimated  from  PE  at  nang  height  points  and  at  every  PE 
calculation  range  step  during  the  initialization  routine. 

Format  is  Op  ( ij )  =  propagation  angle  at  the  i‘h  height  point 

(i=  1  to  ftang )  and  jth  PE  range  step  (/= 0  to  igpE)- 

radians 

GET  ANGLES  SU 

Table  136.  RET_GRAZE  SU  output  data  element  requirements. 


Name 

Description 

Units 

if/ 

J  rout 

Array  of  grazing  angles  at  each  output  range  rout 

radians 

®rout 

Two-dimensional  array  containing  the  propagation  angle  spectrally  estimated 
from  PE  at  nang  height  points  and  at  every  output  range  step  rout 

radians 

terror 

Integer  value  that  is  returned  if  an  error  occurs  in  called  routine 

N/A 

6.  REQUIREMENTS  TRACEABILITY 

This  section  provides  the  traceability  of  the  design  of  the  APM  CSCI  Table  137 
presents  this  traceability  between  the  corresponding  sections  of  the  Software 
Requirements  Specification  (SRS)  and  the  Software  Design  Description  (SDD)  and 
between  the  various  components  of  the  APM  CSCI. 
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Table  137.  Traceability  Matrix  between  the  SRS  and  the  SDD. 


Software  Requirements  Specification 

Software  Design  Description 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Software  Design  Description  Name 

SDD 

Paragraph 

Number 

CSCI  Capability  Requirements 

3.1 

CSCI-WIDE  DESIGN  DECISIONS 

3. 

CSCI  Capability  Requirements 

3.1 

CSCI  Components 

4.1 

CSCI  Capability  Requirements 

3.1 

Concept  of  Execution 

4.2 

Advance  Propagation  Initialization 
(APMINIT)  CSC 

3.1.1 

Advance  Propagation  Initialization 
(APMINIT)  CSC 

5.1 

Allocate  Arrays  APM 
(ALLARRAYAPM)  SU 

3. 1.1.1 

Allocate  Arrays  APM 
(ALLARRAY_APM)  SU 

5.1.1 

Allocate  Array  PE 
(ALLARRAY_PE)  SU 

3. 1.1.2 

Allocate  Array  PE 
(ALLARRAYPE)  SU 

5.1.2 

Allocate  Array  RO 
(ALLARRAY_RO)  SU 

3.1. 1.3 

Allocate  Array  RO 
(ALLARRAYRO)  SU 

5.1.3 

Allocate  Array 
(ALLARRAY_XORUF)  SU 

3. 1.1.4 

Allocate  Array 
(ALLARRAY_XORUF)  SU 

5.1.4 

Alpha  Impedance  Initialization 
(ALNJNIT)  SU 

3.1. 1.5 

Alpha  Impedance  Initialization 
(ALNJNIT)  SU 

5.1.5 

Antenna  Pattern  (ANTPAT)  SU 

3. 1.1.6 

Antenna  Pattern  (ANTPAT)  SU 

5.1.6 

APM  Status  (APMSTATUS)  SU 

3. 1.1.7 

APM  Status  (APMSTATUS)  SU 

5.1.7 

Dielectric  Initialization  (DIEINIT) 

SU 

3.1. 1.8 

Dielectric  Initialization  (DIEINIT) 

SU 

5.1.8 

FFT  Parameters  (FFTPAR)  SU 

3. 1.1.9 

FFT  Parameters  (FFTPAR)  SU 

5.1.9 

Fill  Height  Arrays  (FILLHT)  SU 

3.1.1.10 

Fill  Height  Arrays  (FILLHT)  SU 

5.1.10 

Gaseous  Absorption  (GASABS) 

SU 

3.1.1.11 

Gaseous  Absorption  (GASABS) 

SU 

5.1.11 

Get  Effective  Earth  Radius  Factor 
(GET_K)  SU 

3.1.1.12 

Get  Effective  Earth  Radius  Factor 
(GET  K)  SU 

5.1.12 

Get  Alpha  Impedance  (GETALN) 

SU 

3.1.1.13 

Get  Alpha  Impedance  (GETALN) 

SU 

5.1.13 

Get  Angles  (GETANGLES)  SU 

3.1.1.14 

Get  Angles  (GETANGLES)  SU 

5.1.14 

Get  Maximum  Angle  (GETTHMAX) 
SU 

3.1.1.15 

Get  Maximum  Angle  (GETTHMAX) 
SU 

5.1.15 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

3.1.1.16 

Grazing  Angle  Interpolation 
(GRAZEJNT)  SU 

5.1.16 

Height  Check  (HTCHECK)  SU 

3.1.1.17 

Height  Check  (HTCHECK)  SU 

5.1.17 
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Table  137.  Traceability  Matrix  between  the  SRS  and  the  SDD.  (continued) 


Software  Requirements  Specification 

Software  Design  Description 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Interpolate  Profile  (INTPROF) 

SU 

3.1.1.18 

Interpolate  Profile  (INTPROF) 

SU 

5.1.18 

PE  Initialization  (PEINIT)SU 

3.1.1.19 

PE  Initialization  (PEINIT)SU 

5.1.19 

Poly  4  (FN  POLY4)  Function 

3.1.1.20 

Poly  4  (FN_POLY4)  Function 

5.1.20 

Poly  5  (FN  POLY5)  Function 

3.1.1.21 

Poly  5  (FN_POLY5)  Function 

5.1.21 

Profile  Reference  (PROFREF) 

SU 

3.1.1.22 

Profile  Reference  (PROFREF) 

SU 

5.1.22 

Refractivity  Initialization  (Reflnit) 
SU 

3.1.1.23 

Refractivity  Initialization 
(REFINIT)  SU 

5.1.23 

Remove  Duplicate  Refractivity 
Levels  (REMDUP)  SU 

3.1.1.24 

Remove  Duplicate  Refractivity 
Levels  (REMDUP)  SU 

5.1.24 

RG  Trace  (RGTRACE)  SU 

3.1.1.25 

RG  Trace  (RGTRACE)  SU 

5.1.25 

Terrain  Initialization  (TERINIT) 

SU 

3.1.1.26 

Terrain  Initialization  (TERINIT) 

SU 

5.1.26 

Trace  to  Output  Range 
(TRACE_ROUT)  SU 

3.1.1.27 

Trace  to  Output  Range 
(TRACE  ROUT)  SU 

5.1.27 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

3.1.1.28 

Trace  to  Next  Step 
(TRACE_STEP)  SU 

5.1.28 

Troposcatter  Initialization 
(TROPOINIT)  SU 

3.1.1.29 

Troposcatter  Initialization 
(TROPOINIT)  SU 

5.1.29 

Starter  Field  Initialization 
(XYINIT)  SU 

3.1.1.30 

Starter  Field  Initialization 
(XYINIT)  SU 

5.1.30 

Advance  Propagation  Model 

Step  (APMSTEP)  CSC 

3.1.2 

Advance  Propagation  Model 

Step  (APMSTEP)  CSC 

5.2 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

3. 1.2.1 

Calculate  Propagation  Loss 
(CALCLOS)  SU 

5.2.1 

Current  Wind  (FN_CURWIND) 
Function 

3. 1.2.2 

Current  Wind  (FN_CURWIND) 
Function 

5.2.2 

Dielectric  Constant 
(FN_DIECON)  Function 

3.1 .2.3 

Dielectric  Constant 
(FN_DIECON)  Function 

5.2.3 

DOSHIFTSU 

3. 1.2.4 

DOSHIFTSU 

5.2.4 

Discrete  Sine/Cosine  Fast 

Fourier  Transform  (DRST)  SU 

3.1 .2.5 

Discrete  Sine/Cosine  Fast 

Fourier  Transform  (DRST)  SU 

5.2.5 
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Table  137.  Traceability  Matrix  between  the  SRS  and  the  SDD.  (continued) 


Software  Requirements  Specification 

Software  Design  Description 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Flat  Earth  Direct  Ray  (FEDR)  SU 

3. 1.2. 6 

Flat  Earth  Direct  Ray  (FEDR) 

SU 

5.2.6 

Flat  Earth  Model  (FEM)  SU 

3. 1.2. 7 

Flat  Earth  Model  (FEM)  SU 

5.2.7 

Fast  Fourier  Transform  (FFT)  SU 

3. 1.2. 8 

Fast-Fourier  Transform  (FFT) 

SU 

5.2.8 

Free  Space  Range  Step 
(FRSTP)  SU 

3.1 .2.9 

Free  Space  Range  Step 
(FRSTP)  SU 

5.2.9 

FZLIM  SU 

3.1.2.10 

FZLIM  SU 

5.2.10 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

3.1.2.11 

Get  Propagation  Factor 
(FN_GETPFAC)  Function 

5.2.11 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

3.1.2.12 

Get  Reflection  Coefficient 
(GETREFCOEF)  SU 

5.2.12 

Get  Troposcatter  Loss 
(FN  GET  TLOSS)  Function 

3.1.2.13 

Get  Troposcatter  Loss 
(FN_GET_TLOSS)  Function 

5.2.13 

Linear  Interpolation  (FNPLINT) 
Function 

3.1.2.14 

Linear  Interpolation  (FN  PLINT) 
Function 

5.2.14 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

3.1.2.15 

Mixed  Fourier  Transform 
(MIXEDFT)  SU 

5.2.15 

Parabolic  Equation  Step 
(PESTEP)  SU 

3.1.2.16 

Parabolic  Equation  Step 
(PESTEP)  SU 

5.2.16 

Ray  Trace  (RAYTRACE)  SU 

3.1.2.17 

Ray  Trace  (RAYTRACE)  SU 

5.2.17 

Refractivity  Interpolation 
(REFINTER)  SU 

3.1.2.18 

Refractivity  Interpolation 
(REFINTER)  SU 

5.2.18 

Ray  Optics  Calculation 
(ROCALC)  SU 

3.1.2.19 

Ray  Optics  Calculation 
(ROCALC)  SU 

5.2.19 

Ray  Optics  Loss  (ROLOSS)  SU 

3.1.2.20 

Ray  Optics  Loss  (ROLOSS)  SU 

5.2.20 

Save  Profile  (SAVEPRO)  SU 

3.1.2.21 

Save  Profile  (SAVEPRO)  SU 

5.2.21 

Spectral  Estimation  (SPECEST) 
SU 

3.1.2.22 

Spectral  Estimation  (SPECEST) 
SU 

5.2.22 

Surface  Impedance  (SURFIMP) 

SU 

3.1.2.23 

Surface  Impedance  (SURFIMP) 
SU 

5.2.23 

Troposcatter  (TROPOSCAT)  SU 

3.1.2.24 

Troposcatter  (TROPOSCAT)  SU 

5.2.24 

Extended  Optics  Initialization 
(XOINIT)  CSC 

3.1.3 

Extended  Optics  Initialization 
(XOINIT)  CSC 

5.3 
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Table  137.  Traceability  Matrix  between  the  SRS  and  the  SDD.  (continued) 


Software  Requirements  Specification 

Software  Design  Description 

SRS  Requirement  Name 

SRS 

Paragraph 

Number 

Software  Design  Description 
Name 

SDD 

Paragraph 

Number 

Advanced  Propagation  Model 
Clean  (APMCLEAN)  CSC 

3.1 .3.1 

Advanced  Propagation  Model 
Clean  (APMCLEAN)  CSC 

5.3.1 

Clutter-to-Noise  (CLUTTER)  SU 

3. 1.3.2 

Clutter-to-Noise  (CLUTTER)  SU 

5.3.2 

Diffraction  Loss  (FNDLOSS) 
Function) 

3.1 .3.3 

Diffraction  Loss  (FN  DLOSS) 
Function) 

5.3.3 

Get  Theta  (GETTHETA)  SU 

3.1 .3.4 

Get  Theta  (GETTHETA)  SU 

5.3.4 

GIT  Initialization  (GITJNIT)  SU 

3.1 .3.5 

GIT  Initialization  (GITJNIT)  SU 

5.3.5 

GofZ  (GOFZ)  Function 

3.1 .3.6 

GofZ  (GOFZ)  Function 

5.3.6 

Mean  Filter  (MEANFILT)  SU 

3.1 .3.7 

Mean  Filter  (MEANFILT)  SU 

5.3.7 

Optical  Region  Limit  (OPLIMIT) 

SU 

3.1 .3.8 

Optical  Region  Limit  (OPLIMIT) 
SU 

5.3.8 

Optical  Difference  (OPTICF)  SU 

3.1 .3.9 

Optical  Difference  (OPTICF)  SU 

5.3.9 

R1  Iteration  (RIITER)SU 

3.1.3.10 

R1  Iteration  (RIITER)SU 

5.3.10 

Standard  Propagation  Model 
Initialization  (SPMJNIT)SU 

3.1.3.11 

Standard  Propagation  Model 
Initialization  (SPMJNIT)  SU 

5.3.11 

Standard  Propagation  Model 
(SPM)SU 

3.1.3.12 

Standard  Propagation  Model 
(SPM)  SU 

5.3.12 

Extended  Optics  Step  (XOSTEP) 
CSC 

3.1.4 

Extended  Optics  Step 
(XOSTEP)  CSC 

5.4 

Extended  Optics  (EXTO)  SU 

3. 1.4.1 

Extended  Optics  (EXTO)  SU 

5.4.1 

Return  Grazing  Angle 
(RET_GRAZE)  CSC 

3.1.5 

Return  Grazing  Angle 
(RETJ3RAZE)  CSC 

5.5 

CSCI  External  Interface 
Requirements 

3.2 

External  Interface 

4.3.2 

CSCI  Internal  Interface 
Requirements 

3.3 

Internal  Interface 

4.3.3 

CSCI  Internal  Data  Requirements 

3.4 

Internal  Data 

4.3.4 

Environmental  Radio  Refractivity 
field  Data  Element 

3.5.1 

Environmental  Radio  Refractivity 
field  Data  Element 

7.2 

Terrain  Profile  Data  Element 

3.5.2 

Terrain  Profile  Data  Element 

7.3 

Implementation  and  Application 
Considerations 

3.10.1 

Implementation  and  Application 
Considerations 

7.1 
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7.  NOTES 


7.1  APM  CSCI  IMPLEMENTATION  AND  APPLICATION  CONSIDERATIONS 

The  calling  external  CSCI  application  will  determine  the  employment  of  the  APM 
CSCI.  However,  the  intensive  computational  nature  of  the  APM  CSCI  must  be 
considered  when  designing  an  efficient  calling  application.  For  this  reason,  the  APM 
CSCI  is  designed  with  flexibility  for  various  hardware  suites  and  computer  resource 
management  considerations.  This  APM  CSCI  applies  only  to  a  coverage  and  loss 
diagram  application.  The  following  highly  recommended  guidelines  are  provided  to  aid 
in  the  design  of  a  coverage  or  loss  diagram  application  that  will  most  efficiently  employ 
the  APM  CSCI. 

The  APM  CSCI  propagation  loss  calculations  are  independent  of  any  target  or 
receiver  considerations,  therefore,  for  any  EM  emitter,  one  execution  of  the  APM  CSCI 
may  be  used  to  create  both  a  coverage  diagram  and  a  loss  diagram.  Since  execution  time 
and  computer  memory  allocation  should  be  a  consideration  when  employing  this  model, 
it  is  most  efficient  and  appropriate  to  execute  the  APM  CSCI  for  a  particular  EM 
system/environmental/terrain  combination  before  executing  any  application.  The  output 
of  the  APM  CSCI  would  be  stored  in  a  fde  that  would  be  accessed  by  multiple 
applications. 

For  example,  the  external  application  operator  may  desire  a  coverage  diagram  for 
one  particular  radar  system.  At  the  beginning  of  the  coverage  diagram  application,  a 
check  would  be  made  for  the  existence  of  a  previously  created  APM  CSCI  output  file 
appropriate  for  the  EM  system,  environmental,  and  terrain  conditions.  If  such  a  file 
exists,  the  propagation  loss  values  would  be  read  from  the  file  and  used  to  create  the 
coverage  diagram.  If  the  file  does  not  exist,  the  APM  CSCI  would  be  executed  to  create 
one.  As  the  APM  CSCI  is  executing,  its  output  could  be  routed  simultaneously  to  a 
graphics  display  device  and  a  file.  This  file  could  then  be  used  in  the  loss  diagram 
application  should  the  operator  also  choose  it.  Two  distinct  applications,  therefore,  are 
achieved  with  only  one  execution  of  the  APM  CSCI.  Additionally,  should  the  operator 
desire  an  individual  coverage  diagram  for  each  of  multiple  targets,  or  a  single  coverage 
diagram  illustrating  radar  detection  of  a  low-flying  missile  superimposed  on  a  coverage 
diagram  illustrating  his  own  radar's  vulnerability  as  defined  by  the  missile's  ESM 
receiver,  only  a  single  execution  of  the  APM  CSCI  would  be  required,  thereby  saving 
valuable  computer  resources. 

7.2  ENVIRONMENTAL  RADIO  REFRACTIVITY  FIELD  DATA  ELEMENTS 

The  radio-refractivity  field,  i.e.  the  profiles  of  M-units  versus  height,  should 
consist  of  vertical  piece- wise  linear  profiles  specified  by  couplets  of  height  in  meters  with 
respect  to  mean  sea  level  and  modified  refractivity  (M-units)  at  multiple  arbitrary  ranges. 
All  vertical  profiles  must  contain  the  same  number  of  vertical  data  points  and  be  specified 
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such  that  each  numbered  data  point  corresponds  to  like-numbered  points  (i.e.,  features)  in 
the  other  profiles.  The  first  numbered  data  point  of  each  profile  must  correspond  to  a 
height  of  zero  mean  sea  level  and  the  last  numbered  data  point  must  correspond  to  a 
height  such  that  the  modified  refractivity  for  all  greater  heights  is  well  represented  by 
extrapolation  using  the  two  highest  profile  points  specified. 

With  the  inclusion  of  terrain  and  allowing  the  terrain  profile  to  fall  below  mean 
sea  level,  refractivity  profiles  can  also  be  provided  in  which  the  first  level  is  less  than  0 
(or  below  mean  sea  level).  For  a  terrain  profile  that  falls  below  mean  sea  level  at  some 
point,  the  assumption  is  that  the  minimum  height  may  be  less  than  the  first  height  in  any 
refractivity  profile  specified.  Therefore,  an  extrapolation  flag,  iextra,  must  be  specified  to 
indicate  how  the  APM  CSCI  should  extrapolate  from  the  first  refractivity  level  to  the 
minimum  height  along  the  terrain  profile.  Setting  iextm  to  0  will  cause  the  APM  CSCI  to 
extrapolate  to  the  minimum  height  using  a  standard  atmosphere  gradient;  setting  iextra  to  1 
will  cause  the  APM  CSCI  to  extrapolate  to  the  minimum  height  using  the  gradient 
determined  from  the  first  two  levels  of  the  refractivity  profile. 

Within  each  profile,  each  numbered  data  point  must  correspond  to  a  height  greater 
than  or  equal  to  the  height  of  the  previous  data  point.  Note  that  this  requirement  allows 
for  a  profile  which  contains  redundant  data  points.  Note  also  that  all  significant  features 
of  the  refractivity  profiles  must  be  specified,  even  if  they  are  above  the  maximum  output 
height  specified  for  a  particular  application  of  APM. 


PROFILE  1  PROFILE  2 

(a) 


Figure  3.  Idealized  M-unit  profiles  (solid)  and  lines  of  interpolation  (dashed). 
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The  external  CSCI  application  designer  and  the  external  application  operator 
share  responsibility  for  determining  appropriate  environmental  inputs.  For  example,  a 
loss  diagram  may  be  used  to  consider  a  surface-to-surface  radar  detection  problem.  Since 
the  operator  is  interested  in  surface-to-surface,  he/she  may  truncate  the  profile  while 
assuming  that  effects  from  elevated  ducting  conditions  are  negligible.  It  may  be, 
however,  that  the  elevated  duct  does  indeed  produce  a  significant  effect.  The  operator 
should  ensure  therefore  that  the  maximum  height  of  the  profile  allows  for  the  inclusion  of 
all  significant  refractive  features. 

This  specification  allows  a  complicated  refractivity  field  to  be  described  with  a 
minimum  of  data  points.  For  example,  a  field  in  which  a  single  trapping  layer  linearly 
descends  with  increasing  range  can  be  described  with  just  two  profiles  containing  only 
four  data  points  each,  frame  (a)  of  Figure  3.  In  the  same  manner,  other  evolutions  of 
refractive  layers  may  be  described.  Frames  (b)  and  (c)  of  Figure  3  show  two  possible 
scenarios  for  the  development  of  a  trapping  layer.  The  scenario  of  choice  is  the  one  that  is 
consistent  with  the  true  thermodynamical  and  hydrological  layering  of  the  atmosphere. 

Two  external  implementation  data  variables  applicable  to  both  the  external 
application  operator  and  to  the  calling  application  designer  are  rmax,  the  maximum  APM 
CSCI  output  range,  and  hmax,  the  maximum  APM  CSCI  output  height.  These  two 
parameters  are  required  by  the  APM  CSCI  to  detennine  the  horizontal  and  vertical 
resolution,  respectively,  for  internal  range  and  height  calculations  based  on  the  current 
values  of  nrout  and  nzout.  Any  value  of  rmax  and  hmax  is  allowed  for  the  convenience  of  the 
external  application  operator  and  the  calling  application  designer,  provided  rmax  >  5  km, 
and  hmax  >100  m.  For  example,  the  external  application  operator  may  desire  a  coverage 
diagram  that  extends  to  a  range  of  500  kilometers  (km).  In  addition  to  accommodating 
the  desires  of  the  operator,  specification  of  such  a  convenient  maximum  range  eases  the 
burden  for  the  application  designer  in  determining  incremental  tick  marks  for  the 
horizontal  axis  of  the  display. 

Provided  the  value  of  the  parameter  lerrl2  is  set  to  ‘.false.’,  if  the  furthest 
environment  profile  range  is  less  than  rmax,  the  APM  CSCI  will  automatically  create  an 
environment  profile  at  rmax  equal  to  the  last  profile  specified,  making  the  environment 
homogeneous  from  the  range  of  the  last  profile  specified  to  rmax.  For  example,  a  profile  is 
input  with  an  accompanying  range  of  450  km.  If  the  external  application  operator  chooses 
an  rmax  of  500  km,  the  APM  CSCI  will  continue  loss  calculations  to  500  km,  keeping  the 
refractivity  environment  homogeneous  from  450  km  to  500  km. 

If  lerrl2  is  set  to  ‘.true.’  and  the  furthest  environment  profile  range  is  less  than 
rmax,  then  an  error  will  be  returned  in  ieiror  from  the  APMINIT  CSC,  which  allows  the 
external  CSCI  application  designer  greater  flexibility  in  how  environment  data  are 
handled. 
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7.3  TERRAIN  PROFILE  DATA  ELEMENT 


The  terrain  profile  should  consist  of  linear  piecewise  segments  specified  as 
range/height  pairs.  All  range  values  must  be  increasing,  and  the  first  terrain  height  value 
must  be  at  range  zero.  General  ground  composition  types  can  be  specified  (Table  4), 
along  with  corresponding  ranges  over  which  the  ground  type  is  to  be  applied.  If  ground 
type  “User  Defined”  is  specified  ( igrndj  =  7),  then  numeric  values  of  relative  pennittivity 
and  conductivity  must  be  given. 

The  maximum  height,  hmax,  must  always  be  greater  than  the  minimum  height,  hmin. 
Also,  a  value  of  hmax  must  be  given  such  that  it  is  larger  than  the  maximum  elevation 
height  along  a  specified  terrain  profile. 

Provided  lerr6  is  set  to  ‘.false.’,  if  the  furthest  range  point  in  the  terrain  profile  is 
less  than  rmax,  the  APM  CSCI  will  automatically  create  a  height/range  pair  as  part  of  the 
terrain  profile  at  rmax  with  elevation  height  equal  to  the  last  height  specified  in  the  profile, 
making  the  terrain  profile  flat  from  the  range  of  the  last  profile  point  specified  to  rmax.  For 
example,  a  terrain  profile  is  input  where  the  last  height/range  pair  is  50  m  in  height  with 
an  accompanying  range  of  95  km.  If  the  external  application  operator  chooses  an  rmax  of 
100  km,  the  APM  CSCI  will  continue  loss  calculations  to  100  km,  keeping  the  terrain 
profile  flat  from  95  to  100  km  with  an  elevation  height  of  50  m. 

If  lerr6  is  set  to  ‘.true.’  and  the  furthest  range  point  is  less  than  rmax,  then  an  error 
will  be  returned  in  ierror  from  the  APMINIT  SU,  which  allow  the  external  CSCI 
application  designer  greater  flexibility  in  how  terrain  data  are  handled. 


7.4  ACRONYM  AND  ABBREVIATIONS 

Table  138  is  a  glossary  of  acronyms  and  abbreviations  used  within  this  document. 


Table  138.  Acronyms  and  Abbreviations 


Term 

Definition 

MIN 

Minimum  of  variables  within  parenthesis 

MAX 

Maximum  of  variables  within  parenthesis 

APM 

Advanced  Propagation  Model 

Centibel 

One-hundredth  of  the  logarithm  of  a  quantity 

COMMON  BLOCK 

Allows  two  or  more  FORTRAN  SUs  to  share  variables  without  having  to 
pass  them  as  arguments 

COS 

Cosine  function 

CMPLX 

Data  conversion  to  complex  number 
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Table  138.  Acronyms  and  Abbreviations,  (continued) 


Term 

Definition 

CSCI 

Computer  software  configuration  item 

dB 

Decibel 

decibel 

10  times  the  logarithm  of  a  quantity 

EM 

electromagnetic 

FE 

Flat  earth 

FFT 

Fast-Fourier  Transform 

FORTRAN 

Formula  Translation 

IMAG 

Imaginary  part  of  complex  number 

INT 

Integer  value  of 

km 

Kilometers 

LOG-io 

Logarithm  to  base  10 

LN 

Natural  logarithm 

m 

Meters 

M 

Modified  refractivity  units 

MHz 

MegaHertz 

M-unit 

Refractivity  measurement  unit 

pV/m 

Microvolts  per  meter 

N/A 

Not  applicable 

NINT 

Round  real  number 

PE 

Parabolic  Equation 

p  space 

Phase  space 

RADA1 

Angle  trace  function 

radian 

Unit  of  angular  measurement 

REAL 

Real  part  of  complex  number 

RO 

Ray  Optics 

SIGN 

Sign  transfer  function 

SIN 

Sine  function 

SIN-1 

Inverse  sine  function 

S/m 

Conductivity  unit  Siemens  per  meter 

Sin(X)/X 

Sine(X)/X 

SRS 

Software  Requirements  Specification 

SU 

Software  unit 

TAN-1 

Inverse  tangent  function 

z-space 

Height  space 
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7.5  SDD  VARIABLE  NAME,  FORTRAN  VARIABLE  NAME  CROSS 
REFERENCE 


Table  139  is  a  cross  reference  of  variable  names  used  within  the  body  of  this 
document  and  the  FORTRAN  variable  names  as  used  in  the  APM  CSCI  source  code. 
Included  are  the  SDD  variable  name,  its  description,  the  FORTRAN  source  code  name, 
and  the  designation  of  the  FORTRAN  COMMON  BLOCK  name,  if  applicable.  Note  that 
all  dynamically  allocated  arrays  are  declared  PUBLIC  and  are  common  to  all  SUs 
containing  the  APM  MOD  module. 


Table  139.  Variable  name  cross  reference. 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

a0 

Angle  at  start  of  ray  trace  step 

aO 

N/A 

a\ 

Angle  at  end  of  ray  trace  step 

al 

N/A 

a2 

Tangent  angle  for  receiver  height  zout; 

ang2 

N/A 

datz 

Local  ray  or  propagation  angle  at  height  z;,-m  and  range 

C atz 

aatz 

APMVAR 

abshum 

Absolute  humidity  near  the  surface 

abshum 

REFRACTIVITY 

Cl  c  rit 

Critical  angle  (angle  above  which  no  rays  are  trapped) 

acrit 

APMVAR 

Clcut 

Tangent  angle  from  antenna  height  to  radio  horizon 

acut 

APMVAR 

adif 

Height  differences  between  antref  and  all  output  receiver 
heights 

adif() 

N/A 

Clek 

Effective  earth  radius 

aek 

APMVAR 

&ekst 

4/3  effective  earth’s  radius 

aekst 

N/A 

ainc\ 

Angular  increment  for  ray  tracing  to  determine  grazing 
angles 

aincl 

N/A 

ainci 

Angular  increment  for  ray  tracing  to  determine  grazing 
angles 

ainc2 

N/A 

ainc-i 

Angular  increment  for  ray  tracing  to  determine  grazing 
angles 

ainc3 

N/A 

d  launch 

Launch  angle  used  which,  when  traced,  separates  PE  and 
XO  regions  from  the  RO  region 

alaunch 

APMVAR 

a 

Source  elevation  angle 

ang 

N/A 

ad 

Direct-path  ray  angle 

alphad 

APMVAR 

Cldlf 

The  difference  between  current  and  previous  outgoing 
propagation  angles 

angdif 

N/A 

aid 

LOG  of  antenna  pattern  factor  for  ad  where  Cij  represents 
lowest  direct  ray  angle  in  optical  region 

aid 

N/A 

Ollim 

Elevation  angle  of  the  RO  limiting  ray 

alflim 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

Otpat 

Elevation  angle  relative  to  the  antenna  elevation  angle 

udif 

N/A 

ar 

Reflected-path  ray  angle 

alphar 

N/A 

O^ter 

Tangent  angle  from  antenna  height  to  current  terrain  height 

alphax, 

terang 

N/A 

CCu 

Maximum  tangent  ray  angle  from  the  source  to  the  terrain 
peak  along  profile  height 

angu 

N/A 

Oth,  v 

Surface  impedance  term  for  horizontal  or  vertical 
polarization 

alphaq 

APMVAR 

Omlim 

Elevation  angle  of  RO  limiting  ray  in  radians.  Used  to 
initialize  launch  angle  in  the  GETTHMAX  SU 

amlim 

N/A 

Omxcur 

Maximum  local  angle  along  the  traced  ray  up  to  Z/im  (with 
minimum  limit  amum ) 

amxcur 

N/A 

antfac 

Antenna  pattern  parameter  (depends  on  ipal  and  ///,„) 

afac 

APMVAR 

cintht 

Transmitting  antenna  height  above  local  ground 

antht 

SYSTEMVAR 

CLYltko 

Eleight-gain  value  at  source 

antko 

N/A 

CLTltref 

Transmitting  antenna  height  relative  to  hmi„ter 

antref 

APMVAR 

as 

Propagation  angle  for  start  of  ray  trace 

as 

N/A 

araft 

Array  of  angles  after  smoothing  operation 

araft() 

N/A 

arbef 

Array  of  angles  before  smoothing  operation 

arbef() 

N/A 

Ostart 

Elevation  angle  at  start  of  ray  step 

astart 

N/A 

Otest 

Tangent  angle  used  for  automatic  calculation  of  maximum 
propagation  angle.  Only  used  for  modes  i hybrid  =  0,  2. 

atest 

N/A 

P 

Terminal  elevation  angle 

ab 

N/A 

fa 

Direct  ray  terminal  elevation  angle 

betad 

N/A 

fa 

Reflected  ray  terminal  elevation  angle 

betar 

N/A 

Oa 

Wide-angle  propagator  correction  term 

cak 

N/A 

clx 

Constant  used  to  propagate  Cki  by  one  range  step  in  central 
difference  algorithm 

clx 

APMVAR 

C2x 

Constant  used  to  propagate  Cia  by  one  range  step  in  central 
difference  algorithm 

c2x 

APMVAR 

cki 

Coefficient  used  in  central  difference  form  of  DMFT 

cki 

APMVAR 

Ck2 

Coefficient  used  in  central  difference  form  of  DMFT 

ck2 

APMVAR 

Clut 

Logical  flag  used  to  indicate  if  surface  clutter  calculations 
are  desired. 

clut 

SYSTEMVAR 

cmft 

Coefficient  used  in  backward  difference  form  of  DMFT 

cmft 

APMVAR 

cmftx 

Constant  used  to  propagate  cmft  by  one  range  step  in 
backward  difference  algorithm 

cmft  x 

APMVAR 

CNR 

Clutter-to-Noise  ratio  array 

cnrdBQ 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

C0 

Speed  of  light  (299.79  x  10"6  m/s) 

cO 

N/A 

con 

1  (Ybk0 

con 

APMVAR 

cnp75 

Factor  used  in  calculating/////?  array 

cnp75 

N/A 

cti 

Quantity  defined  in  equ.  124  in  EREPS  3.0  User’s  Manual 

NRaD  TD  2648,  pp.  106 

cti 

N/A 

Cti 

Quantity  defined  in  equ.  125  in  EREPS  3.0  User’s  Manual 

NRaD  TD  2648,  pp.  106 

ct2 

N/A 

curang 

Array  of  current  local  angles  for  each  ray  being  traced  in  XO 
region 

curangQ 

N/A 

curht 

Array  of  current  local  heights  for  each  ray  being  traced  in  XO 
region 

curht() 

N/A 

curng 

Array  of  current  local  ranges  for  each  ray  being  traced  in  XO 
region 

curngO 

N/A 

AFdIo2 

Difference  in  direct  ray  magnitude  along  Axro  below  desired 
APM  output  point 

dfsdlo 

N/A 

AFdh2 

Difference  in  direct  ray  magnitude  along  Axro  above  desired 
APM  output  point 

dfsdhi 

N/A 

AFrlo2 

Difference  in  reflected  ray  magnitude  along  Axro  below 
desired  APM  output  point 

dfsrlo 

N/A 

AFrh2 

Difference  in  reflected  ray  magnitude  along  Axro  above 
desired  APM  output  point 

dfsrhi 

N/A 

AH0 

Frequency  gain  function  correction  term  defined  in  equ.  127  in 
EREPS  3.0  User’s  Manual  NRaD  TD  2648,  pp.  106 

delho 

N/A 

AQhi 

Difference  in  total  phase  lag  angle  along  Axro  above  desired 
APM  output  point 

danghi 

N/A 

VT, 

Difference  in  total  phase  lag  angle  along  Axro  below  desired 
APM  output  point 

danglo 

N/A 

Ap 

Mesh  size  in  angle-  (or  p-)  space 

delp 

APMVAR 

Argrz 

PE  range  step  used  for  calculation  of  grazing  angles 

drgrz 

APMVAR 

An out 

Output  range  step 

drout 

APMVAR 

An pe 

PE  range  step 

dr 

APMVAR 

An pe: 

'A  PE  range  step 

dr2 

APMVAR 

Ay 

ZJ/  temp 

Range  step  for  ray  tracing 

drtemp 

N/A 

Ad 

Angle  difference  between  mesh  points  in  p-space 

dtheta 

APMVAR 

Axro 

RO  range  interval 

delxRO 

APMVAR 

Azout 

Output  height  increment 

dzout 

APMVAR 

AZpe 

PE  mesh  height  increment  (bin  width  in  z-space) 

delz 

APMVAR 

d\ 

Range  from  source  to  tangent  point 

dl 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

di 

Range  from  receiver  to  tangent  point 

d2 

N/A 

d2s 

Array  of  tangent  ranges  for  all  output  receiver  heights  over 
smooth  surface 

d2s() 

N/A 

da 

flhwr 

dalpha 

N/A 

dielec 

Two-dimensional  array  containing  the  relative  permittivity 
and  conductivity;  dielec\  i  and  dieleco^  respectively. 

dielec(,) 

N/A 

dxda 

Derivative  of  range  with  respect  to  elevation  angle 

dxda 

N/A 

dxd  a,i 

Derivative  of  range  with  respect  to  ad 

dxdad 

N/A 

dxda r 

Derivative  of  range  with  respect  to  ar 

dxdar 

N/A 

dzdad 

Derivative  of  height  with  respect  to  ad 

dzdad 

N/A 

dzdar 

Derivative  of  height  with  respect  to  a,- 

dzdar 

N/A 

ek 

Effective  earth’s  radius  factor 

ek 

APMVAR 

envpr 

Complex  [refractivity]  phase  term  array 

envpr() 

N/A 

Sr 

Relative  permittivity 

epsilon 

N/A 

'l. 

Quantity  defined  in  equ.  126  in  EREPS  3.0  User’s  Manual 
NRaD  TD  2648,  pp.  106 

etas 

N/A 

fra) 

Antenna  pattern  factor  for  angle  a 

patfac 

N/A 

f(& 0 

Antenna  pattern  factor  for  angle  .9i 

factr 

N/A 

f(Ud) 

Antenna  pattern  factor  for  direct  ray 

facd 

N/A 

f(-a-r) 

Antenna  pattern  factor  for  reflected  ray 

facr 

N/A 

/array 

Field  array  to  be  propagated  one  range  step  in  free  space 

farray() 

N/A 

Fd 2 

Magnitude  array,  direct  ray 

dmagsq(,) 

APMVAR 

FdB 

Propagation  factor  in  dB 

ff,  facdb 

N/A 

F dBlst 

Propagation  factor  in  dB  at  previous  range 

pfdblst 

N/A 

ffatlm 

Propagation  factor  array  computed  at  1  m  above  the  surface. 

ffatlm_dB() 

N/A 

ffacz 

Two-dimensional  array  containing  propagation  factor, 
range,  and  propagation  angle  at  z/,-m 

ffacz(,) 

N/A 

ffrout 

Array  of  propagation  factors  at  each  output  range  beyond 
ratz  and  at  height  zUm 

ffrout() 

N/A 

filt 

Cosine-tapered  (Tukey)  filter  array 

filto 

N/A 

filtp 

Array  filter  for  spectral  estimation  calculations 

filtpO 

N/A 

/mHz 

Frequency  in  MFlz 

freq 

SYSTEMVAR 

frig 

Frequency  in  MFlz  at  which  to  perform  grazing  angle 
calculations 

frqg 

N/A 

/norm 

Normalization  factor 

fnorm 

APMVAR 

fr 

Fractional  bin  used  for  interpolation 

fr 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

Fr 2 

Magnitude  array,  reflected  ray 

rmagsq(,) 

APMVAR 

fracw 

RO  range  interval  fraction  (0.0  to  0.25) 

fracRO 

N/A 

Fratz 

Propagation  factor  in  dB  at  range  ratz  and  height  Z/im 

pfratz 

N/A 

frsp 

Complex  free  space  propagator  term  array 

frsp() 

N/A 

f2 

J  sum 

Square  of  coherent  sum  of  directand  reflected  rays 

ffac2 

N/A 

fer 

Logical  flag  indicating  if  terrain  profile  has  been 
specified: 

.true.  =  terrain  profile  specified 
.false.  =  terrain  profile  not  specified 

fter 

APMVAR 

fv 

Fraction  range  for  profile  interpolation 

fv 

N/A 

ya 

Surface  specific  attenuation 

gammaa 

REFRACTIVITY 

yc 

Dynamically  allocated  array  of  constants  describing  the 
backscattering  effectiveness  of  the  surface 

gammac() 

TERRAIN 

Yo 

Oxygen  absorption 

gammao 

N/A 

yrng 

Dynamically  allocated  array  of  ranges  corresponding  to 
the  values  in  yc 

gamrngO 

TERRAIN 

Yw 

Water  absorption 

gammaw 

N/A 

T/j  ,v 

Complex  reflection  coefficient  for  horizontal  or  vertical 
polarization 

refcoef 

N/A 

G 

Gain  of  transmit/receive  antennas 

antgain 

SYSTEMVAR 

gasatt 

Gaseous  absorption  attenuation  rate 

gasatt 

APMVAR 

§dS[oss 

Gaseous  absorption  loss  at  range  roul 

gasloss 

APMVAR 

gr 

Intermediate  M-unit  gradient  array,  RO  region 

gr() 

N/A 

grad 

Two-dimensional  array  containing  gradients  of  each 
profile  used  in  XO  calculations 

grad(,) 

N/A 

grd 

Refractivity  gradient 

grd 

N/A 

grdum 

Array  of  refractivity  gradients  defined  by  profile  htdum 
and  refdum 

grdum() 

N/A 

ho 

Height  at  start  of  ray  trace  step 

hO 

N/A 

hx 

Height  at  end  of  ray  trace  step 

hi 

N/A 

Hx 

Quantity  defined  in  equ.  120  in  EREPS  3.0  User’s 

Manual  NRaD  TD  2648,  pp.  106 

horl 

N/A 

Hi 

Quantity  defined  in  equ.  121  in  EREPS  3.0  User’s 

Manual  NRaD  TD  2648,  pp.  106 

hor2 

N/A 

hfang 

Cut-back  angles  in  degrees 

hfang() 

N/A 

hfangr 

Array  of  height-finder  cut-back  angles  in  radians 

hfangr() 

N/A 

hffac 

Cut-back  antenna  pattern  factors 

hffac() 

N/A 

216 


Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

HFjiag 

HF  computation  flag  indicating  the  frequency  specified  is  less 
than  50  MHz 

hf_flag 

APMVAR 

h  large 

Maximum  height  limit  for  last  level  in  height/refractivity 
profiles 

hlarge 

N/A 

hlim 

Array  containing  the  height  at  each  output  range  separating  the 
RO  region  from  the  PE  (at  close  ranges)  and  XO  (at  far  ranges) 
regions 

hlim() 

N/A 

fomax 

Maximum  output  height  with  respect  to  mean  sea  level 

hmax 

INPUTVAR 

hmin 

Minimum  output  height  with  respect  to  mean  sea  level 

hmin 

INPUTVAR 

h 

••'minter 

Minimum  height  of  terrain  profile 

hminter 

APMVAR 

hmref 

Height  relative  to  hminter 

hmref 

APMVAR 

hmsl 

Two-dimensional  array  containing  heights  with  respect  to 
mean  sea  level  of  each  profile.  Array  format  must  be  hmsly  = 
height  of  ith  level  of  f"  profile; /=1  for  range-independent  cases 

hmsl(,) 

N/A 

ha 

Effective  scattering  height  -  defined  in  equ.  109  in  EREPS  3.0 
User’s  Manual  NRaD  TD  2648,  pp.  105 

hO 

N/A 

H0 

Frequency  gain  function  defined  in  equ.  1 19  in  EREPS  3.0 

User’s  Manual  NRaD  TD  2648,  pp.  106 

bigh 

N/A 

href 

Heights  of  refractivity  profile  with  respect  to  yref 

href() 

N/A 

hs 

Height  for  start  of  ray  trace 

hs 

N/A 

h 

start 

Starting  height  for  ray  trace  to  fill  array  hlirn 

hstart 

N/A 

ht 

PE  mesh  height  array  of  size  riff) 

ht() 

N/A 

htdum 

Height  array  for  current  interpolated  profile 

htdum() 

N/A 

htemp 

Heights  at  which  ray  is  traced  to  every  range  in  rtemp 

htemp() 

APMVAR 

liter 

Height  of  terrain  at  end  of  ray  trace  step 

hter 

N/A 

h 

u  ter max 

Maximum  terrain  height  along  profile  path 

htermax 

N/A 

latest 

Minimum  height  at  which  all  trapping  refractivity  features  are 
below 

htest 

N/A 

htfe 

Array  containing  the  height  at  each  output  range  separating  the 
FE  region  from  the  RO  region  (full  hybrid  mode),  or  the  FE 
region  from  the  PE  region  (partial  hybrid  mode) 

htfe() 

N/A 

h  thick 

Thickness  of  highest  trapping  layer  from  all  refractivity 
profiles 

hthick 

N/A 

htum 

Maximum  height  relative  to  hminter 

htlim 

APMVAR 

hu¬ 

Two-dimensional  array  containing  heights  of  each  profile  used 
in  XO  calculations 

htr() 

N/A 

ll 

1  ltrap 

Height  of  highest  trapping  layer  from  all  refractivity  profiles 

htrap 

N/A 

htydif 

htum  “  y fref 

htydif 

APMVAR 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

lalg 

Integer  flag  indicating  which  DMFT  algorithm  is  being 
used: 

0  =  no  DMFT  algorithm  will  be  used 

1  =  use  central  difference  algorithm 

2  =  use  backward  difference  algorithm 

ialg 

APMVAR 

lap 

Index  indicating  when  the  local  ray  angle  becomes 
positive  in  array  raya 

iap 

APMVAR 

l  err 

Return  error  code 

ierr 

N/A 

l  error 

Error  flag  -  traps  for  various  errors  dependent  on  the 
calling  SU 

i  error 

N/A 

l  extra 

Extrapolation  flag  for  refractivity  profiles  entered  in 
combination  with  terrain  below  below  mean  sea  level 

0  =  extrapolate  to  minimum  terrain  height  standard 
atmosphere  gradient 

1=  extrapolate  to  minimum  terrain  height  using  first 
gradient  in  profile 

iextra 

REFRACTIVITY 

iflag 

Flag  indicating  whether  to  determine  maximum  FFT  size 
rifft  based  on  given  &max  and  z;,-m  or  determine  Z/im  based 
on  given  0max  and  FFT  size  /%. 

iflag 

N/A 

Iflag 

Flag  to  indicate  which  transform  to  perform 

0  =  cosine  transform 

1  =  sine  transform 

-1  =  deallocates  all  allocated  arrays 

iflag 

N/A 

iflag 

Integer  flag  indicating  what  region  reflection  coefficient 
is  being  computed 

0  =  FE  and  RO  regions 

1  =  PE  region 

iflag 

N/A 

ig 

Counter  indicating  current  ground  type  being  modeled 

ig 

APMVAR 

lgc 

Number  of  yc  values  for  a  particular  application  of  APM 

igc 

TERRAIN 

igPE 

Number  of  grazing  angles  computed  from  spectral 
estimation 

igpe 

APMVAR 

lgr 

Number  of  different  ground  types  specified 

igr 

TERRAIN 

Igrad 

Index  of  current  gradient  level  in  grad 

igrad 

N/A 

igrd 

Integer  indexes  indicating  at  what  refractive  gradient 
level  to  begin  ray  tracing  for  next  XO  range  step  for  each 
ray  in  XO  region 

igrd() 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

igrnd 

Integer  array  containing  ground  type  composition  for  given 
terrain  profile  -  can  vary  with  range.  Different  ground  types 
are: 

0  =  seawater 

1  =  freshwater 

2  =  wet  ground 

3  =  medium  dry  ground 

4  =  very  dry  ground 

5  =  ice  at  -1  degree  C 

6  =  ice  at  -10  degree  C 

7  =  user-defined  (in  which  case,  values  of  relative 
permittivity  and  conductivity  must  be  given). 

igrnd() 

N/A 

Igrz 

Number  of  grazing  angles  computed  from  ray  trace 

igrz 

APMVAR 

Ihmx 

Output  range  step  index  where  height  htu„  is  reached  in 
array  hlim 

ihmx 

APMVAR 

l  hybrid 

Integer  indicating  which  sub-models  will  be  used: 

0  =  pure  PE  model 

1  =  full  hybrid  model  (PE  +  FE  +  RO  +  XO) 

2  =  partial  hybrid  model  (PE  +  XO) 

ihybrid 

APMVAR 

io 

Starting  index  for  mpfl  array: 

0  =  1st  calculated  output  point  is  at  surface 

1  =  1st  calculated  output  point  is  at  height  Azout 

io 

APMVAR 

lorg 

Integer  flag  indicating  origin  of  calling  SU 

0  =  called  from  APMINIT  CSC 

1  =  called  from  TROPOINIT  SU 

iorg 

N/A 

lp\ 

First  output  height  point  index  in  zout  where  propagation 
loss  will  be  computed  at  previous  PE  range 

ipl 

N/A 

ipi 

First  output  height  point  index  in  zout  where  propagation 
loss  will  be  computed  at  current  PE  range 

ip2 

N/A 

Ipat 

Antenna  pattern  type 

1  =  Omni-directional 

2  =  Gaussian 

3  =  Sine(x)/x 

4  =  Cosecant-squared 

5  =  Generic  height-finder 

6  =  User-defined  height-finder 

7  =  User-defined  antenna  pattern 

8  =  Quarter-wave  vertical  dipole  (should  be  used  only 
for  HF  applications) 

ipat 

SYSTEMVAR 

ipE 

Number  of  PE  range  steps 

ipe 

APMVAR 

Ipeak 

Bin  #  in  spectr  corresponding  to  the  peak  magnitude 

ipeak 

N/A 

IPEstp 

Counter  indicating  current  PE  range  step 

ipestp 

N/A 

Ipl 

Polarization  flag 

0  =  horizontal 

1  =  vertical 

ipl 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

Ipol 

Polarization  flag: 

0  =  horizontal  polarization 

1  =  vertical  polarization 

ipol 

SYSTEMVAR 

Iquit 

Integer  flag  indicating  to  quit  tracing  current  ray  and  begin 
again  with  a  new  launch  angle 

iquit 

N/A 

^ratz 

Index  of  output  range  step  in  which  to  begin  storing 
propagation  factor  and  outgoing  angle  for  XO  region 

iratz 

APMVAR 

iROn 

Array  index  for  next  range  in  RO  region 

iROn 

APMVAR 

iROp 

Array  index  for  previous  range  in  RO  region 

iROp 

APMVAR 

Irp 

Counter  for  current  refractivity/gradient  profile  being  used 
from  grad 

irp 

N/A 

Irps 

Starting  index  counter  for  refractivity  profiles 

irps 

N/A 

Irtemp 

Temporary  number  of  range  steps  (used  for  ray  tracing) 

irtemp 

N/A 

4 

Counter  for  current  profile 

is 

APMVAR 

Istart 

Array  index  for  height  in  RO  region  corresponding  to  antref 

istart 

APMVAR 

l  start  \ 

Refractivity  level  index  within  htdum  at  antref 

istart  1 

APMVAR 

^stp 

Current  output  range  step  index 

istp 

N/A 

Isz 

Number  of  points  over  which  to  perform  average  smoothing 

isz 

N/A 

Itp 

Number  of  height/range  points  in  profile 

itp 

TERRAIN 

Itpa 

Number  of  height/range  points  pairs  in  profile  tx,  ty 

itpa 

APMVAR 

Itype 

Ray  type  (direct  or  reflected)  flag 

0  =  direct 

1  =  reflected 

itype 

N/A 

l xo 

Number  of  range  steps  in  XO  calculation  region 

ixo 

APMVAR 

Ixostp 

Current  output  range  step  index  for  XO  calculations 

ixostp 

N/A 

iz 

Number  of  propagation  factor,  range,  angle  triplets  stored  in 
ffacz 

iz 

APMVAR 

lZg 

Number  of  output  height  points  corresponding  to  local 
ground  height  at  current  output  range  rout 

izg 

APMVAR 

l^inc 

Integer  increment  for  storing  points  at  top  of  PE  region  (i.e., 
points  are  stored  at  every  izinc  range  step) 

izinc 

APMVAR 

l^max 

Maximum  number  of  points  allocated  for  arrays  associated 
with  XO  calculations 

izmax 

APMVAR 

Jae 

Ending  index  within  mpfl  of  airborne  loss  values 

jae 

N/A 

J  as 

Starting  index  within  mpfl  of  airborne  loss  values 

jas 

N/A 

je 

Ending  receiver  height  index  at  which  to  compute 
troposcatter  loss 

je 

N/A 

J  end 

Index  at  which  valid  loss  values  in  mpfl  end 

jend 

N/A 

Jfe 

Ending  index  within  mpfl  of  FE  loss  values 

jfe 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

Jfs 

Starting  index  within  mpfl  of  FE  loss  values 

jfs 

N/A 

J  max 

Array  index  for  maximum  output  height  in  RO  region 

jmax 

N/A 

J  min 

Array  index  for  minimum  output  height  in  RO  region 

jmin 

N/A 

Jpe 

Ending  index  within  mpfl  of  PE  loss  values 

jpe 

N/A 

Jps 

Starting  index  within  mpfl  of  PE  loss  values 

jps 

N/A 

Jre 

Ending  index  within  mpfl  of  RO  loss  values 

jre 

N/A 

Jrs 

Starting  index  within  mpfl  of  RO  loss  values 

jrs 

N/A 

js 

Refractive  profile  index  for  start  of  ray  trace 

js 

N/A 

js 

Starting  receiver  height  index  at  which  to  compute 
troposcatter  loss 

js 

N/A 

J  start 

Index  at  which  valid  loss  values  in  mpfl  start 

j  start 

N/A 

jt2 

Index  counter  for  tx  and  ty  arrays  indicating  location  of 
receiver  range 

jt2 

APMVAR 

Jxe 

Index  at  which  valid  loss  values  in  mpfl  end 

jxe 

N/A 

Jxs 

Index  at  which  valid  loss  values  in  mpfl  start 

jxs 

N/A 

Jxstart 

Starting  index  within  mpfl  of  XO  loss  values 

jxstart 

N/A 

J^lim 

PE  bin  #  corresponding  to  z/,-m,  i.e.,  z/!m  =jzum  AzPe 

jzlim 

APMVAR 

kabs 

Gaseous  absorption  calculation  flag: 

0  =  no  absorption  loss 

1  =  compute  absorption  loss  based  on  air  temperature  ta,r 
and  absolute  humidity  abs]mm 

2  =  compute  absorption  loss  based  on  specified 
absorption  attenuation  rate  ya 

kabs 

N/A 

kbin 

Number  of  bins  complex  PE  field  is  to  be  shifted 

kb  in 

N/A 

hi 

k  index  above  desired  point 

khi 

N/A 

ho 

k  index  below  desired  point 

klo 

N/A 

k 

/v max 

Array  index  for  maximum  angle  in  RO  region  at  range  Xro„ 

kmax 

APMVAR 

k 

/v minn 

Array  index  for  minimum  angle  in  RO  region  at  range  Xroh 

kminn 

APMVAR 

k 

minp 

Array  index  for  minimum  angle  in  RO  region  at  range  Xrop 

kminp 

APMVAR 

h 

Free-space  wavenumber 

fko 

APMVAR 

k 

/v temp 

Temporary  k\0  value 

klotmp 

N/A 

X 

Wavelength 

wl 

APMVAR 

L 

Propagation  loss 

dloss 

N/A 

lang 

Propagation  angle  and  factor  output  flag 

‘.tme.’=  Output  propagation  angle  and  propagation 
factor  for  direct  and  reflected  ray  (where  applicable), 
‘.false.’  =  Do  not  output  propagation  angles  and  factors 

lang 

INPUTVAR 

Ldtf 

Difference  between  propagation  loss  and  troposcatter  loss 

dif 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

Iduct 

Logical  flag  indicating  if  surface -based  duct  profile  has 
been  specified 

‘.true’.  =  surface-based  duct  exists 
‘.false.’  =  no  surface-based  duct  exists 

lduct 

APMVAR 

lerr6 

User-provided  error  flag  that  will  trap  on  certain  errors  if 
set  to  ‘.true.’ 

lerr6 

ERRORFLAG 

lerrl2 

User-provided  error  flag  that  will  trap  on  certain  errors  if 
set  to  ‘.true.’ 

lend  2 

ERRORFLAG 

levap 

Logical  flag  indicating  if  evaporation  duct  profile  has 
been  specified 

‘.true’.  =  evaporation  duct  exists 
‘.false.’  =  no  evaporation  duct  exists 

levap 

APMVAR 

levels 

Number  of  levels  in  gr,  q  and  zrt  arrays 

levels 

APMVAR 

Lfs 

Free  space  loss 

fsloss 

N/A 

Igraze 

Logical  flag  indicating  if  grazing  angles  were  computed 
for  a  particular  application  of  APM 

Igraze 

N/A 

Inew 

Temporary  refractivity  level  counter 

newl 

N/A 

lnfft 

In 

Power  of  2  transform  size,  i.e.  njft= 2  fft 

In 

APMVAR 

Ifl  • 

Minimum  power  of  2  transform  size 

lnmin 

APMVAR 

lnp 

Power  of  2  transform  size  used  in  spectral  estimation 
calculations;  i.e.,  np  =  2lnP 

lnp 

APMVAR 

Lsys 

Miscellaneous  system  losses 

sysloss 

SYSTEMVAR 

Ivl 

Number  of  height  levels  in  each  profile  used  in  XO 
calculations 

lvl() 

N/A 

Ivlep 

Number  of  height/refractivity  levels  in  profile  refdum 
and  htdum 

Ivlep 

APMVAR 

Ivlp 

Number  of  height/refractivity  levels  in  profiles 

lvlp 

REFRACTIVITY 

m 

Size  of  array  arbef 

m 

N/A 

mpfl 

Two-dimensional  propagation  factor  and  loss  array 

mpfl 

N/A 

mpflrtg 

Propagation  loss  and  factor  at  receiver  heights  specified 
in  the  zout  rtg  array 

mpfl_rtg 

N/A 

Po 

Antenna  elevation  angle  in  degrees 

elev 

SYSTEMVAR 

f^or 

Antenna  pattern  elevation  angle  in  radians 

elv 

APMVAR 

Mbw 

Antenna  vertical  beamwidth  in  degrees 

bwidth 

SYSTEMVAR 

Mbwr 

Antenna  vertical  beamwidth  in  radians 

bw 

APMVAR 

fJ-lim 

Limiting  elevation  angle  -  no  more  than  10° 

elv  lim 

N/A 

f^max 

Limiting  angle  for  Sin(X)/X  and  generic  height  finder 
antenna  pattern  factors 

umax 

APMVAR 

n34 

%  riffi 

n34 

APMVAR 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

n4 

y*  riffl 

nf4 

APMVAR 

ftang 

Number  of  points  in  the  vertical  at  which  to  spectrally 
estimate  propagation  angles 

nang 

APMVAR 

2 

nc 

Array  of  complex  dielectric  constants 

cn2() 

N/A 

Nf 

Noise  figure 

qnoisef 

SYSTEMVAR 

nfft 

Transform  size 

n 

APMVAR 

ftfacs 

Number  of  user-defined  cut-back  angles  and  cut-back 
pattern  factors 

nfacs 

SYSTEMVAR 

nlvl 

Number  of  levels  in  new  profile 

nlvl 

APMVAR 

ft  ml 

nml 

APMVAR 

ftOpE 

Integer  flag  indicating  if  PE  calculations  are  needed: 

0  =  PE  calculations  needed 

1  =  no  PE  calculations  needed 

nope 

APMVAR 

ftp34 

V*  np 

np34 

APMVAR 

ftp4 

Vi  np 

np4 

APMVAR 

ftp 

Number  of  bins  in  upper  PE  region  to  consider  for 
spectral  estimation 

npnts 

APMVAR 

ftprof 

Number  of  refractivity  profiles 

nprof 

REFRACTIVITY 

ft  ray 

Number  of  rays  used  for  ray  trace  to  determine  grazing 
angles 

nray 

N/A 

ftrout 

Integer  number  of  output  range  points  desired 

nrout 

INPUTVAR 

fts 

Transform  size  for  spectral  estimation  calculations 

ns 

APMVAR 

ftxo 

Number  of  rays  traced,  i.e.,  height  points,  in  XO  region 

nxo 

N/A 

ftzout 

Integer  number  of  output  height  points  desired 

nzout 

INPUTVAR 

ftzout_rtg 

Number  of  height  output  points  for  receiver  heights 
relative  to  the  local  ground  elevation. 

nzoutrtg 

INPUTVAR 

ftw 

Number  of  wind  speeds 

nw 

REFRACTIVITY 

n 

Total  phase  angle 

phdif 

N/A 

a 

Total  phase  angle  array 

omega(,) 

N/A 

CDS 

Interpolated  wind  speed 

ws, 

windsp 

N/A 

PE  flag 

Flag  to  indicate  use  of  PE  algorithm  only: 

‘.true.’  =  only  use  PE  sub-model 
‘.false.’  =  use  automatic  hybrid  model 

peflag 

INPUTVAR 

P  elev 

Sine  of  antenna  elevation  angle 

pelev 

APMVAR 

<P 

Phase  lag  angle  of  reflected  ray 

rphase 

N/A 

Plcnst 

Constant  used  in  determining  propagation  loss  (plcnst  = 

20  logi0(2  ka)) 

plcnst 

APMVAR 

ph 

Path  length  difference  from  range  x  for  direct  ray 

pld 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

plr 

Path  length  difference  from  range  x  for  reflected  ray 

plr 

N/A 

Pmag 

Interpolated  magnitude  of  complex  PE  field 

pmag 

N/A 

prfhxo 

Two-dimensional  array  of  propagation  factor  and  heights 
for  each  ray  traced  in  XO  region  to  range  rout 

prfh  xo 

N/A 

profint 

Profile  interpolated  to  every  AzPE  in  height 

profint() 

N/A 

propaf 

Two-dimensional  array,  containing  the  propagation 
angles  and  factors  for  the  direct  and  reflected  rays  (where 
applicable)  for  all  output  height/range  points 

propaf() 

N/A 

P, 

Transmitter  peak  power 

tx_pow 

SYSTEMVAR 

V 

Grazing  angle 

psi, 

angle 

N/A 

P 

Array  of  interpolated  grazing  angles  at  each  PE  range 
step 

graze() 

N/A 

w 

J  rout 

Array  of  grazing  angles  at  each  output  range  rou, 

graze_at_rout() 

N/A 

y^lim 

Grazing  angle  of  limiting  ray 

psilim 

APMVAR 

Vpe 

Array  containing  grazing  angles  computed  from  spectral 
estimation  of  PE  field 

grz_pe() 

N/A 

Pray 

Two-dimensional  array  containing  grazing  angles  and 
corresponding  ranges  computed  from  ray  trace 

grz_ray(,) 

N/A 

q 

Intermediate  M-unit  difference  array,  RO  region 

q() 

N/A 

q< 

Quantity  defined  in  equ.  128  in  EREPS  3.0  User’s 

Manual  NRaD  TD  2648,  pp.  107 

qt 

N/A 

r 

Current  PE  range 

r 

N/A 

ro 

Range  at  start  of  ray  trace  step 

rO 

N/A 

r\ 

Range  at  end  of  ray  trace  step 

rl 

N/A 

r  1 

Path  length  for  direct-ray  path 

rl 

N/A 

r  i 

Quantity  defined  in  equ.  122  in  EREPS  3.0  User’s 

Manual  NRaD  TD  2648,  pp.  106 

rl 

N/A 

r2 

Path  length  for  reflected-ray  path 

r2 

N/A 

r2 

Quantity  defined  in  equ.  123  in  EREPS  3.0  User’s 

Manual  NRaD  TD  2648,  pp.  106 

r2 

N/A 

^ange 

Range  for  profile  interpolation 

range 

N/A 

ratio 

Fractional  range  term  used  for  interpolation 

ratiox 

N/A 

ratio  k 

Fraction  of  one  k  index  (0  to  1) 

ratiok 

N/A 

1  atz 

Range  at  which  z/,-m  is  reached  (used  for  hybrid  model) 

ratz 

APMVAR 

raya 

Array  containing  all  local  angles  of  traced  ray  aiaunck  at 
each  irtemp  range 

raya() 

APMVAR 

^ crit 

Minimum  M-unit  value  above  height  antrer 

rcrit 

N/A 

rdif\ 

Range  difference  between  adjacent  terrain  points 

rdifl 

N/A 
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SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

rdif2 

Range  difference  between  adjacent  terrain  points 

rdif2 

N/A 

f difsum 

Sum  of  adjacent  terrain  point  differences 

rdifsum 

N/A 

rdt 

Array  of  minimum  ranges  at  which  diffraction  field  solutions 
are  applicable  (for  smooth  surface)  for  all  output  receiver 
heights 

rdt() 

N/A 

refdum 

M-unit  array  for  current  interpolated  profile 

refdumQ 

N/A 

refmsl 

Two-dimensional  array  containing  refractivity  with  respect  to 
mean  sea  level  of  each  profile.  Array  format  must  be  refmslij 
=  M-unit  at  i'h  level  of jth  profile;  j=\  for  range-independent 
cases 

refmslQ 

N/A 

refref 

Refractivity  profile  with  respect  to  yref 

refref() 

N/A 

rf 

Constant  used  for  troposcatter  calculations 

rf 

APMVAR 

rfacl 

Propagation  factor  at  valid  output  height  points  from  PE  field 
at  range  riast 

rfacl  () 

N/A 

rfac2 

Propagation  factor  at  valid  output  height  points  from  PE  field 
at  range  r 

rfac2() 

N/A 

fjlx 

Fixed  range  increment  of  terrain  profile 

rfix 

N/A 

rjlat 

Maximum  range  at  which  the  terrain  profile  remains  flat  from 
the  source 

rflat 

N/A 

Vfrac 

Ratio  between  adjacent  terrain  point  differences 

rfrac 

N/A 

rgrnd 

Array  containing  ranges  at  which  varying  ground  types  apply 

rgrnd() 

N/A 

V hor 

Radio  horizon  range 

rhor 

APMVAR 

^ hor\ 

Minimum  range  at  which  diffraction  field  solutions  are 
applicable  -  determined  for  0  receiver  height 

rdhorl 

APMVAR 

Rk 

Constant  used  to  compute  coefficients  in  central  difference 
form  of  the  DMFT 

rk 

APMVAR 

V*last 

Previous  PE  range 

rlast 

N/A 

nog 

10  logio(  PE  range  r  ) 

rlog 

APMVAR 

rlogo 

Array  containing  20  times  the  logarithm  of  all  output  ranges 

rlogo() 

N/A 

^loglst 

10  logi0(previous  PE  range  rlast) 

rloglst 

APMVAR 

rloss 

Propagation  loss 

rlossQ 

N/A 

rloss_rtg 

Propagation  loss  computed  relative  to  the  local  ground  height 
at  heights  specified  by  zout  rtg 

rloss_rtg() 

N/A 

rm 

Intermediate  M-unit  array,  RO  region 

rm() 

N/A 

R-mag 

Magnitude  of  reflection  coefficient 

rmag 

N/A 

V max 

Maximum  specified  range 

rmax 

INPUTVAR 

V mid 

Range  at  which  interpolation  for  range-dependent  profiles  is 
performed 

rmid 

N/A 

fWlmax 

Maximum  M-unit  value  of  refractivity  profile  at  range  0 

rmmax 

N/A 

225 


Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

FWlmin 

Minimum  M-unit  value  of  refractivity  profile  at  range  0 

rmmin 

N/A 

rmtx 

M-unit  value  at  height  antrer 

rmtx 

APMVAR 

mult 

PE  range  step  multiplication  factor 

rmult 

INPUTVAR 

rn 

Array  ofRTto  the  i'  power  (e.g.,  rip  =  Rj  ) 

rn() 

N/A 

rngout 

Array  containing  all  desired  output  ranges 

rngout() 

N/A 

rngprof 

Ranges  of  each  profile:  rngprof  =  range  of  zth  profile 

rngprof() 

N/A 

mgwind 

Ranges  of  wind  speeds  entered:  mgwind ,•  =  range  of  ih  wind 
speed 

rngwind() 

N/A 

ra 

Current  ending  range  for  ray  trace  step 

ro 

N/A 

ROddir 

Array  of  propagation  angles  of  direct  rays  determined  in  the 

RO  region 

ROdir_ang() 

APMVAR 

ROaref 

Array  of  propagation  angles  of  reflected  rays  determined  in 
the  RO  region 

ROref_ang() 

APMVAR 

V  out 

Current  output  range 

rout 

N/A 

Y pest 

Range  at  which  PE  loss  values  will  start  being  calculated 

rpest 

APMVAR 

rs 

Range  for  start  of  ray  trace 

rs 

N/A 

F skip 

Approximate  range  interval  of  skip  zone  if  duct  is  present 

rskip 

N/A 

f slope 

Ray  slope  used  in  determining  reflection  point  over  terrain 

rslope 

N/A 

V sq 

Square  of  current  output  range 

rsq 

N/A 

^ sqk 

Earth  curvature  correction  factor 

rsqk 

N/A 

rsqrd 

Array  containing  the  square  of  all  desired  output  ranges 

rsqrd() 

N/A 

Rj 

Complex  root  of  quadratic  equation  for  mixed  transform 
method  based  on  Kuttler’s  formulation 

rt 

APMVAR 

rt\ 

zy  multiplied  by  antref 

rlt 

APMVAR 

rtemp 

Range  steps  for  tracing  to  determine  maximum  PE  angle 

rtempO 

APMVAR 

r,st 

Range  at  which  to  begin  RO  calculations  (equal  to  2.5  km) 

rtst 

N/A 

ruf 

Logical  flag  indicating  if  rough  sea  surface  calculations  are 
required 

‘.true.’  =  perform  rough  sea  surface  calculations 
‘.false.’  =  do  not  perform  rough  sea  surface  calculations 

ruf 

APMVAR 

ruffac 

Factor  used  for  wave  height  calculation 

ruffac 

APMVAR 

rufht 

Sea  surface  rms  wave  height 

rufht 

APMVAR 

rv  i 

Range  of  the  previous  refractivity  profile 

rvl 

N/A 

rv  2 

Range  of  the  next  refractivity  profile 

rv2 

APMVAR 

a 

Conductivity 

sigma 

N/A 

s 

Quantity  defined  equ.  1 10  in  EREPS  3.0  User’s  Manual 

NRaD  TD  2648,  pp.  105 

s 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

$bw 

Sine  of  antenna  vertical  beam  width 

sbw 

APMVAR 

Sgain 

Normalization  factor  used  in  starter  field  calculation 

sgain 

N/A 

sip 

Slope  of  each  segment  of  terrain 

slp() 

N/A 

sn\ 

Term  used  in  troposcatter  loss  calculation 

snl 

N/A 

snref 

Surface  refractivity 

snref 

N/A 

snrefo 

Surface  refractivity  taken  from  the  refractivity  profile 
with  respect  to  mean  sea  level 

snref  0 

APMVAR 

snref x 

Surface  refractivity  at  transmitter 

snref  tx 

APMVAR 

spectr 

Spectral  amplitude  of  field 

spectr() 

N/A 

30 

Array  of  angles  used  to  determine  common  volume 
scattering  angle 

thetaO() 

N/A 

3. , 

Tangent  angle  from  source  height 

theta  1 

N/A 

32 

Tangent  angle  from  receiver  height 

theta2 

N/A 

31s 

Tangent  angle  from  source  (for  smooth  surface) 

theta  Is 

APMVAR 

32s 

Array  of  tangent  angles  from  all  output  receiver 
heights  -  used  with  smooth  surface 

theta2s() 

N/A 

31 1 

Array  of  tangent  angles  from  source  height  -  used  with 
terrain  profile 

thlO 

N/A 

3hbw 

Antenna  horizontal  beam  width 

horbw 

SYSTEMVAR 

02  n  a  \ 

Maximum  propagation  angle  in  PE  calculations 

thetamax 

N/A 

3 

wmxg 

Maximum  PE  calculation  angle  for  spectral  estimation 
of  grazing  angles 

thmxg 

N/A 

075 

75%  of  maximum  propagation  angle  in  PE 
calculations 

theta75 

APMVAR 

3out 

Outgoing  propagation  angle  determined  at  top  of  PE 
region 

thout 

N/A 

e 

Common  volume  scattering  angle 

theta 

N/A 

0rout 

Two-dimensional  array  containing  the  propagation 
angle  spectrally  estimated  from  PE  at  nang  height 
points  and  at  every  output  range  step  rout 

ptheta_rout(,) 

N/A 

0P 

Two-dimensional  array  containing  the  propagation 
angle  estimated  from  PE  at  nang  height  points  and  at 
every  PE  calculation  range  step  during  the 
initialization  routine. 

ptheta(,) 

N/A 

e, 

Angular  interval  limit  for  ray  trace  in  determining 
grazing  angles 

degt 

N/A 

tair 

Air  temperature  near  the  surface 

tail' 

REFRACTIVITY 

T 

Pulse  length/width 

pulselen 

SYSTEMVAR 

tang 

Tangent  of  angle  array  from  terrain  slopes. 

tang() 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

terx 

Range  points  of  terrain  profile 

terxQ 

N/A 

tery 

Height  points  of  terrain  profile 

tery() 

N/A 

th 

1,1  max 

Visible  portion  of  maximum  PE  calculation  angle 

thmax 

INPUTVAR 

tloss 

Troposcatter  loss  in  dB 

tloss 

N/A 

tlst 

Troposcatter  loss  term 

tlst 

N/A 

tlsts 

Troposcatter  loss  term  for  smooth  surface  case 

tlsts 

N/A 

t 

Troposcatter  loss  term  used  in  TROPOSCAT  SU 

tsltwr 

APMVAR 

T 

1  ropo 

Troposcatter  calculation  flag: 

‘. false. ’=  no  troposcatter  calcs 
‘.true.’  =  troposcatter  calcs 

tropo 

INPUTVAR 

twoka 

Twice  the  effective  earth’s  radius 

twoka 

APMVAR 

twokddown 

Twice  the  effective  earth  radius  for  downward  path 

twokadown 

APMVAR 

tx 

Range  points  of  terrain  profile 

tx() 

N/A 

ty 

Adjusted  height  points  of  terrain  profile 

ty() 

N/A 

tyh 

Adjusted  height  points  of  sampled  terrain  profile  at  every 

PE  range  step 

tyh() 

N/A 

U 

Complex  field  at  current  PE  range  r 

u() 

N/A 

Udum 

Dummy  array  used  for  temporary  storage  of  real  or 
imaginary  part  of  complex  PE  field  array  U 

udum() 

N/A 

Ulast 

Complex  field  at  previous  PE  range  r/m, 

ulst() 

N/A 

w 

Difference  equation  of  complex  PE  field 

w() 

N/A 

wind 

Array  of  wind  speeds 

wind() 

N/A 

winder 

Angle  between  antenna  boresight  and  upwind  direction 

wind_dir 

REFRACTIVITY 

X 

Current  output  range 

X 

N/A 

X 

nm 

Field  array  to  be  transformed  -  dimensioned  2  JJ  in  calling 

SU 

x() 

N/A 

xdum 

Real  part  of  complex  field  array 

xdum() 

N/A 

XOcon 

Constant  used  in  determining  9out 

xocon 

APMVAR 

xp 

Real  part  of  spectral  field 

xp() 

N/A 

Xr 

Terminal  range  -  called  Xrou  in  ROCALC  SU 

rout 

N/A 

X reflect 

Range  at  which  ray  is  reflected 

xreflect 

N/A 

%ROn 

Next  range  in  RO  region 

xROn 

APMVAR 

%ROp 

Previous  range  in  RO  region 

xROp 

APMVAR 

%temp 

Temporary  range  in  ray  trace  step 

xtemp 

N/A 

%sum 

Running  sum  of  range  during  ray  trace 

xsum 

N/A 

XX 

Fractional  range  for  interpolation 

XX 

N/A 
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Table  139.  Variable  name  cross  reference,  (continued) 


SDD 

variable 

name 

Description 

FORTRAN 

source 

code  name 

FORTRAN 

common 

block  name 

ych 

Height  of  terrain  at  the  current  PE  range  relative  to  hmref 

ych 

N/A 

y cur 

Height  of  ground  at  current  range  r 

ycur 

APMVAR 

y  curm 

Height  of  ground  midway  between  last  and  current  PE  range 

ycurm 

APMVAR 

ydiff 

y cur  ~  y  last 

ydiff 

N/A 

ydum 

Imaginary  part  of  complex  field  array 

ydum() 

N/A 

yfiref 

Ground  elevation  height  at  source 

yfref 

APMVAR 

yiast 

Height  of  ground  at  previous  range  riast 

yiast 

APMVAR 

ym 

Height  of  terrain  at  the  previous  PE  range  relative  to  hmref 

ylh 

N/A 

ym 

Particular  solution  of  difference  equation 

ym() 

N/A 

yp 

Imaginary  part  of  spectral  field 

yp() 

N/A 

y>-ef 

Ground  elevation  height  at  current  range 

yref 

N/A 

Zc 

Height  at  which  to  compute  propagation  factor  for  clutter 
calculations  relative  to  hmref 

zc 

APMVAR 

Zd 

Terminal  height  of  direct  ray 

zd 

N/A 

Zint 

Interpolated  terrain  elevation  at  current  output  range 

zint 

N/A 

Zk 

Height  of  kth  RO  index 

zk 

N/A 

Zlim 

Height  limit  for  PE  calculation  region 

zlim 

APMVAR 

Zlimt 

htUm- 10"5 

zlimt 

N/A 

Zmax 

Total  height  of  the  FFT/PE  calculation  domain 

zmax 

APMVAR 

zout 

Array  containing  all  desired  output  heights  referenced  to  hminter 

zout() 

N/A 

zoutma 

Array  output  heights  relative  to  “real”  antref 

zoutma() 

N/A 

zoutpa 

Array  output  heights  relative  to  “image”  antref 

zoutpa() 

N/A 

zoutrtg 

Dynamically  allocated  array  of  receiver  heights  specified  relative 
to  the  local  ground  height. 

zout_rtg() 

INPUTVAR 

Zr 

Receiver  height 

height,  zr 

N/A 

zro 

Array  of  output  heights  in  RO  region 

zro() 

N/A 

zrt 

Intermediate  height  array,  RO  region 

zrt() 

N/A 

Ztest 

Height  in  PE  region  that  must  be  reached  for  hybrid  model 

ztest 

N/A 

Ztol 

Height  tolerance  for  Newton's  method 

ztol 

APMVAR 

ZXO 

Height  of  the  ground  at  the  current  output  range  step 

zxo() 

N/A 

229 


SOFTWARE  TEST  DESCRIPTION 
FOR  THE 

ADVANCED  PROPAGATION  MODEL  CSCI 
(Version  2.1.04) 


20  December  2006 


CONTENTS 


1.  SCOPE . 1 

1.1  IDENTIFICATION . 1 

1.2  DOCUMENT  OVERVIEW . 1 

2.  REFERENCE  DOCUMENTS . 1 

3.  TEST  PREPARATIONS . 2 

3.1  HARDWARE  PREPARATION . 2 

3.2  SOFTWARE  PREPARATION . 2 

3.3  OTHER  PRETEST  PREPARATION . 2 

4.  TEST  DESCRIPTIONS . 2 

4.1  REQUIREMENTS  ADDRESSED . 4 

4.2  PREREQUISITE  CONDITIONS . 4 

4.3  TEST  INPUTS . 4 

4.4  EXPECTED  TEST  RESULTS . 31 

4.5  CRITERIA  FOR  EVALUATING  RESULTS . 69 

4.6  TEST  PROCEDURE . 69 

4.7  ASSUMPTIONS  AND  CONSTRAINTS . 69 

5.  REQUIREMENTS  TRACEABILITY . 69 

6.  NOTES . 69 

7.  SAMPLE  PROGRAM  LISTING . 71 

8.  INPUT  FILE  LISTINGS  FOR  TEST  CASES . 84 

8.1  ABSORB. IN . 84 

8.2  AFEVAP.IN . 84 

8.3  AFSBD.IN . 85 

8.4  AFSTD.IN . 86 

8.5  AIRBORNE. IN . 87 

8.6  BLOCK.IN . 87 

8.7  CLEVAPW.IN . 88 

8.8  CLSBDL.IN . 89 

8.9  CLSBDW.IN . 91 

8.10  CLSBDWL.IN . 91 

8.11  COSEC2.IN . 96 

8.12  EDUCT.IN . 96 

8.13  EDUCTRF.IN . 97 

8.14  FLTA50.IN . 98 

8.15  GASABS.IN . 99 

8.16  GAUSS. IN . 99 

8.17  HEIGHT.RTG . 100 

8.18  HF10TER . 105 

8.19  HF20QWVD . 109 

8.20  HF20RF . 110 

8.21  HF30.IN . 110 

8.22  HIBW.IN . Ill 

8.23  HIEL.IN . 112 

8.24  HIFREQ.IN . 112 

8.25  HITRAN.IN . 113 

8.26  HORZ.IN . 114 

8.27  HTFIND.IN . 114 

8.28  LOBW.IN . 115 


8.29  LOEL.IN . 116 

8.30  LOFREQ.IN . 116 

8.31  LOTRAN.IN . 117 

8.32  MPRT.IN . 118 

8.33  PERW.IN . 118 

8.34  PVT. IN . 119 

8.35  RDLONGB.IN . 120 

8.36  RNGDEP.IN . 123 

8.37  SBDUCT.IN . 124 

8.38  SBDUCTRF.IN . 124 

8.39  SINEX.IN . 125 

8.40  TROPOS.IN . 126 

8.41  TROPOT.IN . 126 

8.42  USERDEFA . 129 

8.43  USERHF.IN . 131 

8.44  VERT.IN . 132 

8.45  VERTMIX.IN . 132 

8.46  VERTSEA.IN . 133 

8.47  VERTUSRD.IN . 134 

8.48  WEDGE. IN . 134 

TABLES 

Table  1.  Test  Names  and  Descriptions . 3 

Table  2.  External  environmental  data  element  requirements3 . 6 

Table  3. Standard  atmosphere  with  118  M/km  gradient . 8 

Table  4.  300  meter  surface  based  duct  atmosphere . 8 

Table  5.  Atmosphere  for  14  meter  evaporation  duct . 8 

Table  6.  Atmosphere  for  24  meter  evaporation  duct . 9 

Table  7.  Range-dependent  atmosphere,  standard  atmosphere  to  surface-based  duct . 9 

Table  8.  Range-dependent  atmosphere,  surface-based  duct  to  high  elevated  duct . 9 

Table  9.  Elevated  duct . 10 

Table  1 0.  Atmosphere  for  20  meter  evaporation  duct . 10 

Table  11.  External  EM  system  data  element  requirements . 12 

Table  12.  Height  finder  angles  and  factors  for  case  USERDEFA . 14 

Table  13.  Height  finder  angles  and  factors  for  case  USERHF . 15 

Table  14.  External  implementation  data  element  requirements . 16 

Table  1 5.  Heights  relative  to  ground  for  test  case  HEIGHTRTG . 17 

Table  16.  External  terrain  data  element  requirements . 18 

Table  17  Terrain  profile  for  test  case  BLOCK . 18 

Table  18.  Terrain  profile  for  test  case  CLSBDL . 19 

Table  1 9.  Ground  types  for  test  case  CLSBDL . 22 

Table  20.  Terrain  profile  for  test  case  CLSBDWL  and  HF10TER . 22 

Table  21 .  Ground  types  for  test  case  CLSBDWL . 24 

Table  22.  Terrain  profile  for  test  case  FLTA50 . 24 

Table  23.  Terrain  profile  for  test  case  HEIGHT  RTG . 25 

Table  24.  Ground  types  for  test  case  HF10TER . 27 

Table  25.  Terrain  profile  for  test  case  MPRT . 27 

Table  26.  Terrain  profile  for  test  case  PERW . 28 

Table  27.  Terrain  profile  for  test  case  PVT . 28 

ii 


Table  28.  Terrain  profile  for  test  case  RDLONGB  and  TROPOT . 29 

Table  29.  Ground  types  for  test  case  RDLONGB  and  TROPOT . 30 

Table  30.  Terrain  profile  for  test  case  VERTMIX . 30 

Table  31 .  Terrain  profile  for  test  case  VERTUSRD . 31 

Table  32.  Terrain  profile  for  test  case  WEDGE . 31 

Table  33.  Expected  output  for  ABSORB  for  rmax  receiver  range  of  50  km . 32 

Table  34.  Expected  output  for  AFEVAP  for  rmax  receiver  range  of  50  km . 32 

Table  35.  Expected  output  for  AFSBD  for  rmax  receiver  range  of  1 00  km . 33 

Table  36.  Expected  Output  for  AFSTD  for  rmax  receiver  range  of  50  km . 33 

Table  37.  Expected  Output  for  AIRBORNE  for  rmax  receiver  range  of  250  km . 34 

Table  38.  Expected  output  for  BLOCK  for  rmax  receiver  range  of  60  km . 34 

Table  39.  Expected  output  for  CLEVAPW  for  receiver  height  of  0  and  500  m,  plus  clutter-to-noise 

ratio  (CNR) . 35 

Table  40.  Expected  output  for  CLSBDL  for  receiver  height  of  500  and  1000  m,  plus  clutter-to- 

noise  ratio  (CNR) . 38 

Table  41.  Expected  output  for  CLSBDW  for  receiver  height  of  500  and  1000  m,  plus  clutter-to- 

noise  ratio  (CNR) . 41 

Table  42.  Expected  output  for  CLSBDWL  for  receiver  height  of  1 500  and  3000  m,  plus  clutter-to- 

noise  ratio  (CNR) . 44 

43.  Expected  output  for  COSEC2  for  rmax  receiver  range  of  50  km . 47 

Table  44.  Expected  output  for  EDUCT  for  rmax  receiver  range  of  50  km . 47 

Table  45.  Expected  output  for  EDUCTRF  for  rmax  receiver  range  of  100  km . 48 

Table  46.  Expected  output  for  FLTA50  for  rmax  receiver  range  of  50  km . 48 

Table  47.  Expected  output  for  GASABS  for  rmax  receiver  range  of  50  km . 49 

Table  48.  Expected  output  for  GAUSS  for  rmax  receiver  range  of  50  km . 49 

Table  49.  Expected  output  for  HEIGHT  RTG  for  receiver  height  of  500  m . 50 

Table  50.  Expected  output  for  HF10TER  for  receiver  heights  of  0,  1000,  and  2000  m . 51 

Table  51.  Expected  output  for  HF20QWVD  for  rmax  receiver  range  of  100  km . 52 

Table  52  Expected  output  for  HF20RF  for  rmax  receiver  range  of  1 00  km . 52 

Table  53.  Expected  output  for  HF30  for  rmax  receiver  range  of  100  km . 53 

Table  54.  Expected  output  for  HIBW  for  rmax  receiver  range  of  50  km . 53 

Table  55.  Expected  output  for  HIEL  for  rmax  receiver  range  of  50  km . 54 

Table  56.  Expected  output  for  HIFREQ  for  rmax  receiver  range  of  50  km . 54 

Table  57.  Expected  output  for  HITRAN  for  rmax  receiver  range  of  50  km . 55 

Table  58.  Expected  output  for  HORZ  for  rmax  receiver  range  of  50  km . 55 

Table  59.  Expected  output  for  HTFIND  for  rmax  receiver  range  of  50  km . 56 

Table  60.  Expected  output  for  LOBW  for  rmax  receiver  range  of  50  km . 56 

Table  61 .  Expected  output  for  LOEL  for  rmcLX  receiver  range  of  50  km . 57 

Table  62.  Expected  output  for  LOFREQ  for  rmax  receiver  range  of  50  km . 57 

Table  63.  Expected  output  for  LOTRAN  for  rmax  receiver  range  of  50  km . 58 

Table  64.  Expected  output  for  MPRT  for  receiver  heights  of  0  and  1 1 00  m . 59 

Table  65.  Expected  output  for  PERW  for  receiver  heights  of  0  and  1000  m . 60 

Table  66.  Expected  output  for  PVT  for  rmax  receiver  range  of  10  km . 61 

Table  67.  Expected  output  for  RDLONGB  for  rmax  receiver  range  of . 61 

Table  68.  Expected  output  for  RNGDEP  for  rmax  receiver  range  of  250  km . 62 

Table  69.  Expected  output  for  SBDUCT  for  rmax  receiver  range  of  200  km . 62 

Table  70.  Expected  output  for  SBDUCTRF  for  rmax  receiver  range  of  200  km . 63 

Table  71.  Expected  output  for  SINEX  for  rmax  receiver  range  of  50  km . 63 

iii 


Table  72.  Expected  output  for  TROPOS  for  rmax  receiver  range  of  200  km . 64 

Table  73.  Expected  output  for  TROPOT  for  rmax  receiver  range  of  200  km . 64 

Table  74.  Expected  output  for  USERDEFA  for  rmax  receiver  range  of  300  km . 65 

Table  75.  Expected  output  for  USERHF  for  rmax  receiver  range  of  50  km . 65 

Table  76.  Expected  output  for  VERT  for  rmax  receiver  range  of  50  km . 66 

Table  77.  Expected  output  for  VERTMIX  for  rmax  receiver  range  of  50  km . 66 

Table  78.  Expected  output  for  VERTSEA  for  rmax  receiver  range  of . 67 

Table  79.  Expected  output  for  VERTUSRD  for  rmax  receiver  range  of . 67 

Table  80.  Expected  output  for  WEDGE  for  rmax  receiver  range  of  100  km . 68 

Table  81 .  Acronyms  and  Abbreviations . 70 


1.  SCOPE 


1.1  IDENTIFICATION 

Advanced  Propagation  Model  (APM)  Version  2.1.04  computer  software 
configuration  item  (CSCI).  The  purpose  of  the  APM  CSCI  is  to  calculate  range- 
dependent  electromagnetic  (EM)  system  propagation  loss  and  propagation  factor  within  a 
heterogeneous  atmospheric  medium  over  variable  terrain,  where  the  radio-frequency 
index  of  refraction  is  allowed  to  vary  both  vertically  and  horizontally.  Numerous 
external  applications  require  EM-system  propagation  loss  values.  The  APM  model 
described  by  this  document  may  be  applied  to  two  such  external  applications,  one  which 
displays  propagation  loss  on  a  range  versus  height  scale  (commonly  referred  to  as  a 
coverage  diagram)  and  one  which  displays  propagation  loss  on  a  propagation  loss  versus 
range/height  scale  (commonly  referred  to  as  a  loss  diagram). 

1.2  DOCUMENT  OVERVIEW 

This  document  specifies  the  test  cases  and  test  procedures  necessary  to  perfonn 
qualification  testing  of  the  APM  CSCI.  A  discussion  of  precise  input  values  of  each 
input  variable  required  to  perform  the  test  together  with  final  expected  test  results  is 
presented. 


2.  REFERENCE  DOCUMENTS 

1.  Commander-In-Chief,  Pacific  Fleet  Meteorological  Requirement  (PAC  MET)  87-04, 
“Range  Dependent  Electromagnetic  Propagation  Models.” 

2.  Naval  Oceanographic  Office,  “Software  Documentation  Standards  and  Coding 
Requirements  for  Environmental  System  Product  Development,”  April  1990. 

3.  Space  and  Naval  Warfare  Systems  Center  San  Diego  (SSC  SD),  “Software 
Requirements  Specification  for  the  Advanced  Propagation  Model  (APM)  CSCI 
(Version  1.3.1),”  Aug.  1998. 

4.  Space  and  Naval  Warfare  Systems  Center  San  Diego  (SSC  SD),  “Software  Design 
Document  for  the  Advanced  Propagation  Model  (APM)  CSCI  (Version  1.3.1),”  Aug. 
1998. 

5.  Space  and  Naval  Warfare  Systems  Center  San  Diego  (SSC  SD),  “Software  Design 
Document  for  the  Advanced  Propagation  Model  (APM)  CSCI,”  TD  3033,  Aug.  1998. 
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3.  TEST  PREPARATIONS 


3.1  HARDWARE  PREPARATION 


Not  applicable 

3.2  SOFTWARE  PREPARATION 

A  short  driver  program,  APMMAIN.F90,  is  provided  in  Section  7.  This  program 
exercises  the  main  software  components,  APMINIT  CSC,  APMSTEP  CSC,  XOINIT 
CSC,  and  XOSTEP  CSC  that  comprise  the  APM  CSCI.  The  driver  program 
demonstrates  how  to  access  the  APM  CSCI  and  to  exercise  the  test  cases  listed  in  the 
following  sections.  It  is  written  to  read  all  necessary  input  data  for  the  test  cases  from 
files  in  a  specific  format.  All  necessary  input  information  is  presented  in  tables  in 
Section  4.3  and  the  input  files  for  each  test  case  are  listed  in  Section  8. 

One  of  the  main  features  of  APM  is  the  use  of  dynamic  allocation  in  most  of  the 
arrays  used  for  numeric  calculations  and  as  inputs  to  the  model.  The  external  CSCI 
application  designer  must  be  careful  to  properly  allocate  memory  and  initialize  all 
variable  and  array  inputs  to  APM.  Ultimately,  it  is  the  responsibility  of  the  external 
CSCI  application  designer  to  provide  the  necessary  input  in  the  form  required  by  the 
APM  CSCI. 

3.3  OTHER  PRETEST  PREPARATION 

None. 


4.  TEST  DESCRIPTIONS 

The  test  specification  for  the  APM  CSCI  consists  of  48  separate  tests  that  exercise 
all  subroutines  and  functions  of  the  CSCI.  For  ease  of  testing,  each  of  these  48  tests  is 
given  a  name  describing  which  portion  of  the  APM  CSCI  is  being  exercised.  All  48  tests 
and  their  descriptions  are  listed  in  Table  1 . 
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Table  1 .  Test  Names  and  Descriptions. 


Test  Name 

Description 

ABSORB 

Gaseous  absorption  attenuation  rate  is  specified. 

AFEVAP 

Enables  the  computation  of  propagation  angles  and  factors  for  an 
evaporation  duct  environment. 

AFSBD 

Enables  the  computation  of  propagation  angles  and  factors  for  a  surface- 
based  duct  environment. 

AFSTD 

Enables  the  computation  of  propagation  angles  and  factors  for  a  standard 
atmosphere. 

AIRBORNE 

Airborne  platform  for  antenna  height. 

BLOCK 

The  terrain  profile  consists  of  a  vertical  flat-topped  block  or  obstacle  in 
which  the  terrain  slope  is  undefined. 

CLEVAPW 

Computes  clutter-to-noise  ratio  for  an  evaporation  duct  environment  where 
the  propagation  path  is  entirely  over  water. 

CLSBDL 

Computes  clutter-to-noise  ratio  for  a  surface-based  duct  environment  where 
the  propagation  path  is  entirely  over  land. 

CLSBDW 

Computes  clutter-to-noise  ratio  for  a  surface-based  duct  environment  where 
the  propagation  path  is  entirely  over  water. 

CLSBDWL 

Computes  clutter-to-noise  ratio  for  a  surface-based  duct  environment  where 
the  propagation  path  is  a  mixed  land-sea  path. 

COSEC2 

Antenna  pattern  is  of  cosecant-squared  type. 

EDUCT 

The  refractivity  consists  of  a  14  meter  evaporation  duct  profile. 

EDUCTRF 

The  refractivity  consists  of  a  14  meter  evaporation  duct  in  the  presence  of 
rough  seas  with  wind  speed  of  10  m/s. 

FLTA50 

Raised  flat  land  with  antenna  height  of  50  m. 

GASABS 

The  surface  absolute  humidity  and  surface  air  temperature  are  specified  in 
order  to  compute  a  gaseous  absorption  attenuation  rate. 

GAUSS 

Antenna  pattern  is  of  Gaussian  type. 

HEIGHTRTG 

Computes  the  propagation  loss/factor  for  specific  heights  relative  to  the 
local  ground  height. 

HF10TER 

HF  (10  MHz)  emitter  where  the  propagation  path  is  entirely  over  land. 

HF20QWVD 

HF  (20  MHz)  emitter  with  quarter-wave  dipole  antenna;  propagation  path  is 
entirely  over  water. 

HF20RF 

HF  (20  MHz)  emitter  with  quarter-wave  dipole  antenna;  propagation  path  is 
over  a  rough  sea  surface  with  a  wind  speed  of  10  m/s. 

HF30 

HF  (30  MHz)  emitter  over  a  smooth  sea  surface. 

HIBW 

Large  vertical  beamwidth  is  specified. 

HIEL 

High  elevation  angle  is  specified. 

HIFREQ 

High  frequency. 

HITRAN 

High  transmitter  antenna  height. 

HORZ 

Horizontal  polarization  antenna  and  standard  atmosphere. 

HTFIND 

Antenna  pattern  is  of  generic  height-finder  type. 

LOBW 

Small  vertical  beamwidth  is  specified. 

LOEL 

Low  elevation  angle  is  specified. 

3 


Table  1.  Test  Names  and  Descriptions.  (Continued) 


Test  Name 

Description 

LOFREQ 

Low  frequency. 

LOT RAN 

Low  transmitter  antenna  height. 

MPRT 

Mid-path  reflection  over  wedge. 

PERW 

Propagation  over  rounded  wedge  using  PE  model  only. 

PVT 

Parabolic  valley  with  short  range. 

RDLONGB 

Range-dependent  refractivity  over  a  DTED-extracted  terrain  profile  from 
Long  Beach  to  Point  Mugu,  using  vertical  polarization  and  generic  ground 
composition  types. 

RNGDEP 

Range-dependent  refractivity  over  smooth  earth  (over-water  case). 

SBDUCT 

300  meter  surface-based  duct,  over-water  case. 

SBDUCTRF 

Exercises  rough  surface  model  for  surface-based  duct  case,  with  wind 
speed  of  10  m/s. 

SINEX 

Antenna  pattern  is  of  Sine(X)/X  type. 

TROPOS 

Exercises  troposcatter  model  for  smooth  surface  (over-water  case). 

TROPOT 

Exercises  troposcatter  model  for  terrain  case. 

USERDEFA 

User-defined  antenna  pattern  with  explicit  power  and  angle  information. 

USERHF 

Antenna  pattern  is  of  specific  height  finder  type,  with  user-specified  cut¬ 
back  angles  and  power  factors. 

VERT 

Vertical  polarization  antenna  is  specified  (short  range  over-water  case, 
standard  atmosphere). 

VERTMIX 

Vertical  polarization  antenna  over  mixed  land-sea  terrain  path. 

VERTSEA 

Vertical  polarization  antenna  is  specified  (long  range  over-water  case, 
ducting  atmosphere). 

VERTUSRD 

Vertical  polarization  antenna  and  user-specified  dielectric  ground  constants. 

WEDGE 

The  terrain  profile  consists  of  a  triangular  wedge. 

4.1  REQUIREMENTS  ADDRESSED 


Not  applicable. 

4.2  PREREQUISITE  CONDITIONS 

None. 

4.3  TEST  INPUTS 

Although  there  are  actual  values  for  all  input  parameters  listed  in  the  input  files  in 
Section  8,  some  are  ignored  depending  on  the  values  of  certain  input  parameters.  Those 
input  parameters  that  are  inapplicable  depending  on  the  test  case,  are  listed  as  “N/A”  in 
the  tables.  Note  that  for  all  test  cases,  the  error  flags  lerr6  and  lerrl2  are  set  to 
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“.TRUE.”.  These  flags  allow  for  extra  error  control  regarding  terrain  and  refractivity 
inputs.  We  recommend  that  these  error  flags  always  be  set  to  “.TRUE.”.  However,  we 
allowed  the  capability  of  the  external  applications  designer  to  bypass  these  error  controls 
according  to  the  application. 

The  external  environmental  data  element  requirements  are  listed  in  Table  2  for 
each  test  name,  with  Table  3  through  Table  9  providing  specific  height  and  M-unit 
values.  The  external  EM  system  data  element  requirements  are  listed  Table  11. 
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Table  2.  External  environmental  data  element  requirements3. 


Test  Name 

hmsl;  refmsl 

Table 

ft prof 

Ivlp 

rngprof 0 

Table 

ftbShum 

(g/m3) 

lair 

(°C) 

Ya 

(dB/km) 

ftw 

rngwind 

(km) 

wind 

(m/s) 

winddlr 

(deg) 

ABSORB 

3 

i 

2 

0. 

0. 

0. 

.146 

0 

N/A 

N/A 

0. 

AFEVAP 

6 

i 

17 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

AFSBD 

4 

i 

4 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

AFSTD 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

AIRBORNE 

9 

i 

5 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

BLOCK 

3 

i 

2 

0. 

7.5 

0. 

0. 

0 

N/A 

N/A 

0. 

CLEVAPW 

10 

i 

50 

0. 

0. 

0. 

0. 

1 

0. 

10. 

0. 

CLSBDL 

4 

i 

4 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

CLSBDW 

4 

i 

4 

0. 

0. 

0. 

0. 

1 

0. 

10. 

0. 

CLSBDWL 

4 

i 

4 

0. 

0. 

0. 

0. 

1 

0. 

10. 

45. 

COSEC2 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

EDUCT 

5 

i 

21 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

EDUCTRF 

5 

i 

21 

0. 

0. 

0. 

0. 

1 

0. 

10. 

0. 

FLTA50 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

GASABS 

3 

i 

2 

0. 

10. 

25. 

0. 

0 

N/A 

N/A 

0. 

GAUSS 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HEIGHT_RTG 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HF10TER 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HF20QWVD 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HF20RF 

3 

i 

2 

0. 

0. 

0. 

0. 

1 

0. 

10. 

0. 

HF30 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HIBW 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HIEL 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HIFREQ 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HITRAN 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

HORZ 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 
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Table  2.  External  environmental  data  element  requirements3.  (Continued) 


Test  Name 

hmsl;  refinsl 

Table 

M prof 

Ivlp 

rngprof 0 

Table 

ClbShum 

(g/m3) 

1 air 

(°C) 

Ya 

(dB/km) 

«w 

rngwind 

(km) 

wind 

(m/s) 

wind#, 

(deg) 

HTFIND 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

LOBW 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

LOEL 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

LOFREQ 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

LOTRAN 

3 

i 

2 

0. 

0. 

0. 

0. 

0 

N/A 

N/A 

0. 

MPRT 

3 

i 

2 

0. 

7.5 

0. 

0. 

0 

N/A 

N/A 

0. 

PERW 

3 

i 

2 

0. 

7.5 

0. 

0. 

0 

N/A 

N/A 

0. 

PVT 

3 

i 

2 

0. 

7.5 

0. 

0. 

0 

N/A 

N/A 

0. 

RDLONGB 

7 

2 

4 

7 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

RNGDEP 

8 

2 

4 

8 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

SBDUCT 

4 

1 

4 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

SBDUCTRF 

4 

1 

4 

0. 

0. 

0. 

0. 

1. 

0. 

10. 

0. 

SINEX 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

TROPOS 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

TROPOT 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

USERDEFA 

4 

1 

4 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

USERHF 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

VERT 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

VERTMIX 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

VERTSEA 

4 

1 

4 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

VERTUSRD 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

0. 

WEDGE 

3 

1 

2 

0. 

0. 

0. 

0. 

0. 

N/A 

N/A 

aThe  interpolation  flag,  iextra,  is  set  to  0  for  all  test  cases. 

bThe  refractivity  profile  range  is  in  meters  except  for  cases  RDLONGB  and  RNGDEP,  which  refer  to  the  specific  Table  number. 
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Table  3. Standard  atmosphere  with  118  M/km  gradient. 


i 

hmsli  i 

refmslj  i 

(meters) 

(M-unit) 

i 

0. 

350. 

2 

1000. 

468. 

Table  4.  300  meter  surface  based  duct  atmosphere. 


i 

hmsli'  i 

(meters) 

refmslj^  \ 

(M-unit) 

i 

0. 

339.0 

2 

250. 

368.5 

3 

300. 

319.0 

4 

1500. 

460.6 

Table  5.  Atmosphere  for  14  meter  evaporation  duct. 


i 

hmsf'  i 

(meters) 

refmsli'i 

(M-unit) 

i 

0.000 

339.00 

2 

0.040 

335.10 

3 

0.100 

333.66 

4 

0.200 

332.60 

5 

0.398 

331.54 

6 

0.794 

330.51 

7 

1.585 

329.53 

8 

4.362 

328.65 

9 

6.310 

327.96 

10 

12.589 

327.68 

11 

14.000 

327.67 

12 

25.119 

328.13 

13 

39.811 

329.25 

14 

50.119 

330.18 

15 

63.096 

331.44 

16 

79.433 

334.32 

17 

100.000 

335.33 

18 

125.893 

338.20 

19 

158.489 

341.92 

20 

199.526 

346.69 

21 

209.526 

347.87 
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Table  6.  Atmosphere  for  24  meter  evaporation  duct. 


i 

hmsli\ 

(meters) 

refmslj  | 

(M-unit) 

i 

0.0 

0.0 

2 

0.135 

-20.40 

3 

0.223 

-21.89 

4 

0.368 

-23.37 

5 

0.607 

-24.84 

6 

1.000 

-26.29 

7 

1.649 

-27.71 

8 

2.718 

-29.08 

9 

4.482 

-30.35 

10 

7.389 

-31.49 

11 

12.182 

-32.39 

12 

20.086 

-32.90 

13 

24.000 

-32.95 

14 

33.115 

-32.78 

15 

54.598 

-31.59 

16 

90.017 

-28.66 

17 

148.413 

-22.86 

Table  7.  Range-dependent  atmosphere,  standard  atmosphere  to  surface-based  duct. 


Standard  Atmosphere 

rngprof  =  0  km 

Surface-based  Duct 

rngprof 2  =  100  km 

i 

hmsf  i 

(meters) 

refmslj  \ 

(M-unit) 

hmslj2 

(meters) 

refmslj >2 

(M-unit) 

1 

0. 

350. 

0. 

339.0 

2 

0. 

350. 

250. 

368.5 

3 

0. 

350. 

300. 

319.0 

4 

1000. 

468. 

1000. 

401.6 

Table  8.  Range-dependent  atmosphere,  surface-based  duct  to  high  elevated  duct. 


Surface-based  Duct 

rngprof  =  0.  km 

High  Elevated  Duct 
rngprof  =  250.  km 

i 

hmslj'  i 

refmslj] 

hmsl  1, 2 

refmslj p. 

meters 

M-unit 

meters 

M-unit 

i 

0. 

330. 

0. 

330. 

2 

100. 

342.5 

600. 

405. 

3 

230. 

312.5 

730. 

375. 

4 

2000. 

517.8 

2000. 

522.3 
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Table  9.  Elevated  duct. 


i 

hmslj\ 

(meters) 

refmslj  | 

(M-unit) 

i 

0. 

209.2 

2 

1100. 

339.0 

3 

1500. 

386.2 

4 

1625. 

361.5 

5 

5625. 

833.5 

Table  10.  Atmosphere  for  20  meter  evaporation  duct. 


i 

hmslix 

(meters) 

refmslj  | 

(M-unit) 

i 

0.000000 

339.000000 

2 

0.833333 

318.405284 

3 

1.666667 

316.841934 

4 

2.500000 

315.968883 

5 

3.333333 

315.378476 

6 

4.166667 

314.942950 

7 

5.000000 

314.605389 

8 

5.833333 

314.335435 

9 

6.666667 

314.114965 

10 

7.500000 

313.932289 

11 

8.333333 

313.779427 

12 

9.166667 

313.650685 

13 

10.000000 

313.541859 

14 

10.833333 

313.449758 

15 

11.666667 

313.371900 

16 

12.500000 

313.306318 

17 

13.333333 

313.251426 

18 

14.166667 

313.205927 

19 

15.000000 

313.168748 

20 

15.833333 

313.138987 

21 

16.666667 

313.115883 

22 

17.500000 

313.098787 

23 

18.333333 

313.087139 

24 

19.166667 

313.080455 

25 

20.000000 

313.078311 

26 

20.833333 

313.080339 

27 

21.666667 

313.086209 

28 

22.500000 

313.095632 

29 

23.333333 

313.108350 

to 


Table  10.  Atmosphere  for  20  meter  evaporation  duct  (continued). 


i 

hmslj'i 

(meters) 

refmsli'i 

(M-unit) 

30 

24.166667 

313.124130 

31 

25.000000 

313.142767 

32 

25.833333 

313.164071 

33 

26.666667 

313.187874 

34 

27.500000 

313.214022 

35 

28.333333 

313.242374 

36 

29.166667 

313.272804 

37 

30.000000 

313.305194 

38 

30.833333 

313.339436 

39 

31.666667 

313.375432 

40 

32.500000 

313.413091 

41 

33.333333 

313.452328 

42 

34.166667 

313.493066 

43 

35.000000 

313.535231 

44 

35.833333 

313.578758 

45 

36.666667 

313.623583 

46 

37.500000 

313.669648 

47 

38.333333 

313.716898 

48 

39.166667 

313.765283 

49 

40.000000 

313.814755 

50 

1200.000000 

444.851829 

11 


Table  11.  External  EM  system  data  element  requirements. 


Test  Name 

ftAHz 

(MHz) 

anth, 

(meters) 

a 

Ipat 

.  b 

Ipol 

Mbw 

(deg) 

Ao 

(deg) 

cte 

Cl  fit  gain 

(d  Bi) 

@hbw 

(deg) 

T 

(lasec) 

(dB) 

LSys 

(dB) 

P, 

(kW) 

ABSORB 

20000. 

25. 

i 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

AFEVAP 

3000 

25 

i 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

AFSBD 

3000 

25 

i 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

AFSTD 

1000 

25 

i 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

AIRBORNE 

900. 

2500. 

i 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

BLOCK 

1000. 

101. 

i 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

CLEVAPW 

10,000. 

25. 

3 

1 

2 

0. 

.true. 

32. 

1.5 

1.3 

10.0 

8.4 

285. 

CLSBDL 

3000. 

15. 

5 

0 

1.5 

0.5 

.true. 

39. 

2.0 

9.0 

5.5 

3.0 

2000. 

CLSBDW 

3000. 

15. 

5 

0 

1.5 

0.5 

.true. 

39. 

2.0 

9.0 

5.5 

3.0 

2000. 

CLSBDWL 

5600. 

15. 

3 

0 

16. 

0. 

.true. 

30. 

1.5 

1.3 

5.0 

3.0 

230. 

COSEC2 

1000. 

25. 

4 

0 

1. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

EDUCT 

10,000. 

15. 

2 

0 

5. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

EDUCTRF 

10,000. 

15. 

2 

0 

5. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

FLTA50 

1000. 

50. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

GASABS 

20,000. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

GAUSS 

1000. 

25. 

2 

0 

1. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HEIGHT_RTG 

162.4 

54.864 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HF10TER 

10. 

20. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HF20QWVD 

20. 

20. 

8 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HF20RF 

20. 

20. 

8 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HF30 

30. 

10. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HIBW 

1000. 

25. 

3 

0 

45. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HIEL 

1000. 

25. 

2 

0 

1. 

10. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HIFREQ 

20,000. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HITRAN 

1000. 

100. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HORZ 

1000. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

HTFIND 

1000. 

25. 

5 

0 

2. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

LOBW 

1000. 

25. 

2 

0 

0.5 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

LOEL 

1000. 

25. 

2 

0 

1. 

-10. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

LOFREQ 

100. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

LOTRAN 

1000. 

1.5 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 
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Table  11.  External  EM  system  data  element  requirements  (continued). 


Test  Name 

flvtHz 

(MHz) 

anth, 

(meters) 

a 

Ipat 

.  b 
Ipol 

Mbw 

(deg) 

Ao 

(deg) 

cte 

ClYlt gain 

(d  Bi) 

@hbw 

(deg) 

r 

(nsec) 

Nf 

(dB) 

^sys 

(dB) 

P, 

(kW) 

MPRT 

300. 

800. 

2 

i 

0.5 

-2.5 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

PERW 

300 

10. 

1 

i 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

PVT 

500. 

10. 

1 

i 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

RDLONGB 

150. 

100. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

RNGDEP 

3000. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

SBDUCT 

3000. 

25. 

2 

0 

5. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

SBDUCTRF 

3000. 

25. 

2 

1 

5. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

SIN  EX 

1000. 

25. 

3 

0 

1. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

TROPOS 

100. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

TROPOT 

100. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

USERDEFAC 

900. 

6. 

7 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

USERHFd 

1000. 

25. 

6 

0 

1. 

0. 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

VERT 

1000. 

25. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

VERTMIX 

100. 

10. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

VERTSEA 

100. 

25. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

VERTUSRD 

100. 

10. 

1 

1 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

WEDGE 

1000. 

25. 

1 

0 

N/A 

N/A 

.false. 

N/A 

N/A 

N/A 

N/A 

N/A 

N/A 

a 


Antenna  Pattern:  1=Omni-directional;  2=Gaussian;  3=Sine(X)/X;  4=Cosecant-squared;  5=Generic  height-finder;  6=User-specified  height  finder,  7=User- 
defined;  8=Quarter-wave  dipole  antenna  pattern. 
bPolarization:  0=Horizontal;  1=Vertical 
cSee  Table  12  for  hffang  and  hffac  parameters  {nfacs- 54).. 
dSee  Table  13  for  hffang  and  hffac  parameters  (nfacs- 10). 
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Table  12.  Antenna  pattern  angles  and  factors  for  case  USERDEFA  (continued). 


i 

hfangi 

(deg) 

hffaCi 

42 

24 

.164 

43 

25 

.148 

44 

26 

.130 

45 

27 

.110 

46 

28 

.095 

47 

29 

.077 

48 

30 

.070 

49 

31 

.065 

50 

32 

.058 

51 

33 

.050 

52 

34 

.039 

53 

35 

.031 

54 

36 

.025 

Table  13.  Height  finder  angles  and  factors  for  case  USERHF. 


i 

hfangi 

(deg) 

hffaCj 

i 

1.0 

0.9 

2 

1.5 

0.8 

3 

2.0 

0.7 

4 

2.5 

0.6 

5 

3.0 

0.5 

6 

3.5 

0.4 

7 

4.0 

0.3 

8 

4.5 

0.2 

9 

5.0 

0.1 

10 

5.5 

0.0 

The  external  implementation  data  element  requirements  that  must  be  specified  for 
each  test  are  listed  in  Table  14.  For  all  cases  except  those  noted,  Tropo  is  ‘.true.’,  and  hmin 
is  0.0  meters.  Note:  the  Ians  flag  should  only  be  used  for  over-water  propagation  paths 
and  should  not  be  enabled  for  cases  where  any  portion  of  the  path  is  over  land. 
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Table  14.  External  implementation  data  element  requirements. 


Test  Name 

h 

,lmax 

(meters) 

"rout 

"zout 

PEflag 

r 

'  max 

(km) 

^ mult 

th 

11 1  max 

(deg) 

I  err  6 

Ierrl2 

Icing 

ABSORB 

200. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true 

.true. 

.false. 

AFEVAP 

1000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true 

.true. 

.true. 

AFSBD 

3000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true 

.true. 

.true. 

AFSTD 

1000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true 

.true. 

.true. 

AIRBORNE 

5000. 

1 

20 

.false. 

250. 

N/A 

N/A 

.true 

.true. 

.false. 

BLOCK 

400. 

1 

20 

.false. 

60. 

N/A 

N/A 

.true 

.true. 

.false. 

CLEVAPW 

1000. 

100 

2 

.false. 

100. 

N/A 

N/A 

.false. 

.true. 

.false. 

CLSBDL 

1000. 

100 

2 

.false. 

100. 

N/A 

N/A 

.false. 

.true. 

.false. 

CLSBDW 

1000. 

100 

2 

.false. 

100. 

N/A 

N/A 

.false. 

.true. 

.false. 

CLSBDWL 

3000. 

100 

2 

.false. 

200. 

N/A 

N/A 

.false. 

.true. 

.false. 

COSEC2 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

EDUCT 

200. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

EDUCTRF 

200. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

FLTA50 

100. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

GASABS 

200. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

GAUSS 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HEIGHTRTG3 

500. 

20 

1 

.false. 

18.41 

N/A 

N/A 

.false. 

.true. 

.false. 

HF10TER 

2000. 

30 

2 

.false. 

249. 

N/A 

N/A 

.true. 

.true. 

.false. 

HF20QWVD 

1000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

HF20RF 

1000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

HF30 

1000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

HIBW 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HIEL 

20,000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HIFREQ 

200. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HITRAN 

1000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HORZ 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

HTFIND 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

LOBW 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

LOEL 

20,000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

LOFREQ 

5000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

LOT RAN 

10,000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

MPRT 

1100. 

30 

1 

.false. 

60. 

N/A 

N/A 

.true. 

.true. 

.false. 

PERW 

1000. 

20 

1 

.true. 

50. 

1. 

10. 

.true. 

.true. 

.false. 

PVT 

2000. 

1 

20 

.false. 

10. 

N/A 

N/A 

.true. 

.true. 

.false. 

RDLONGB 

1000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

RNGDEP 

2000. 

1 

20 

.false. 

250. 

N/A 

N/A 

.true. 

.true. 

.false. 

SBDUCT 

5000. 

1 

20 

.false. 

200. 

N/A 

N/A 

.true. 

.true. 

.false. 

SBDUCTRF 

1000. 

1 

20 

.false. 

200. 

N/A 

N/A 

.true. 

.true. 

.false. 
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Table  14.  External  implementation  data  element  requirements  (continued). 


Test  Name 

h 

" max 

(meters) 

"■rout 

"zout 

PEftag 

r,nax 

(km) 

f mult 

th 

1,1 max 

(deg) 

lerr6 

Ierrl2 

long 

SINEX 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

TROPOSb 

2000. 

1 

20 

.false. 

200. 

N/A 

N/A 

.true. 

.true. 

.false. 

TROPOTb 

2000. 

1 

20 

.false. 

200. 

N/A 

N/A 

.true. 

.true. 

.false. 

USERDEFA 

3000. 

1 

20 

.false. 

300. 

N/A 

N/A 

.true. 

.true. 

.false. 

USERHF 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

VERT 

2000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

VERTMIX 

1000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

VERTSEA 

1000. 

1 

20 

.false. 

300. 

N/A 

N/A 

.true. 

.true. 

.false. 

VERTUSRD 

1000. 

1 

20 

.false. 

50. 

N/A 

N/A 

.true. 

.true. 

.false. 

WEDGE 

1000. 

1 

20 

.false. 

100. 

N/A 

N/A 

.true. 

.true. 

.false. 

anZOut_rtg-=  3;  see  Table  15  for  specific  heights. 
bTropo  =  ‘.true.’ 


Table  15.  Heights  relative  to  ground  for  test  case  HEIGHT_RTG. 


i 

zout_rtgi 

(meters) 

i 

1.2 

2 

2.5 

3 

5.1 

The  external  terrain  data  element  requirements  are  only  applicable  to  select  test 
cases  and  are  listed  below  in  Table  16.  All  test  cases  where  no  terrain  profile  is  specified 
implies  the  propagation  path  is  entirely  over  sea  water.  Terrain  profiles  used  for  these 
specific  test  cases  are  listed  in  Table  17  through  Table  32. 
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Table  16.  External  terrain  data  element  requirements. 


Test  Name 

terx,  tery 

Table’ 

^tp 

igr 

igrnd 

rgrnd 

(km) 

dielec 

(sr.of 

lgC 

yc 

(dB) 

yrng 

(km) 

BLOCK 

6 

i 

7 

0. 

(7.5, .01) 

N/A 

N/A 

N/A 

Table  17 

CLSBDL 

Table  18 

374 

2 

Table  19 

Table  19 

N/A 

2 

Table  19 

Table  19 

CLSBDWL 

Table  20 

265 

2 

Table  21 

Table  21 

N/A 

2 

Table  21 

Table  21 

FLTA50 

Table  22 

2 

1 

7 

0. 

(7.0,  .01) 

N/A 

N/A 

N/A 

HEIGHT_RTG 

Table  23 

304 

1 

3 

0. 

N/A 

N/A 

N/A 

N/A 

HF10TER 

Table  20 

265 

2 

Table  24 

Table  24 

Table  24 

N/A 

N/A 

N/A 

MPRT 

Table  25 

5 

1 

7 

0. 

(7.5,  0.01) 

N/A 

N/A 

N/A 

PERW 

Table  26 

11 

1 

7 

0. 

(7.5,  0.01) 

N/A 

N/A 

N/A 

PVT 

Table  27 

17 

1 

7 

0. 

(7.5,  0.01) 

N/A 

N/A 

N/A 

RDLONGB 

Table  28 

167 

6 

N/A 

N/A 

N/A 

N/A 

Table  29 

Table  29 

TROPOT 

Table  28 

167 

6 

N/A 

N/A 

N/A 

N/A 

Table  29 

Table  29 

VERTMIX 

Table  30 

2 

2 

Table  30 

Table  30 

N/A 

N/A 

N/A 

N/A 

VERTUSRD 

Table  31 

2 

1 

7 

0. 

(3.,  6e-4) 

N/A 

N/A 

N/A 

WEDGE 

Table  32 

5 

1 

0 

0. 

N/A 

N/A 

N/A 

N/A 

3 e  r-  relative  permittivity;  a  -  conductivity  (S/m) 


Table  17  Terrain  profile  for  test  case  BLOCK. 


i 

terxi 

(km) 

teryi 

(meters) 

i 

0. 

1. 

2 

10. 

1. 

3 

10. 

200. 

4 

40. 

200. 

5 

40. 

1 

6 

60. 

1 
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i  auie  io.  i  errain  proTiie  top  xesi  case  ulodul 


i 

terXi 

(km) 

teryt 

(meters) 

i 

terXi 

(km) 

teryt 

(meters) 

i 

terXi 

(km) 

teryt 

(meter 

i 

0.00 

91.0 

43 

10.50 

37.9 

85 

21.00 

10.8 

2 

0.25 

81.9 

44 

10.75 

36.7 

86 

21.25 

11.4 

3 

0.50 

66.5 

45 

11.00 

36.8 

87 

21.50 

11.7 

4 

0.75 

53.6 

46 

11.25 

34.9 

88 

21.75 

10.6 

5 

1.00 

42.3 

47 

11.50 

31.7 

89 

22.00 

8.5 

6 

1.25 

40.6 

48 

11.75 

32.5 

90 

22.25 

8.0 

7 

1.50 

44.8 

49 

12.00 

35.8 

91 

22.50 

8.7 

8 

1.75 

53.4 

50 

12.25 

32.7 

92 

22.75 

9.0 

9 

2.00 

64.4 

51 

12.50 

25.6 

93 

23.00 

9.1 

10 

2.25 

62.8 

52 

12.75 

22.9 

94 

23.25 

8.7 

11 

2.50 

53.6 

53 

13.00 

22.9 

95 

23.50 

7.9 

12 

2.75 

54.9 

54 

13.25 

22.9 

96 

23.75 

6.7 

13 

3.00 

62.6 

55 

13.50 

22.9 

97 

24.00 

5.1 

14 

3.25 

63.2 

56 

13.75 

22.7 

98 

24.25 

5.2 

15 

3.50 

59.4 

57 

14.00 

22.4 

99 

24.50 

6.3 

16 

3.75 

57.1 

58 

14.25 

22.3 

100 

24.75 

7.0 

17 

4.00 

55.7 

59 

14.50 

22.4 

101 

25.00 

7.4 

18 

4.25 

53.2 

60 

14.75 

22.4 

102 

25.25 

7.6 

19 

4.50 

49.8 

61 

15.00 

22.5 

103 

25.50 

7.6 

20 

4.75 

43.7 

62 

15.25 

20.3 

104 

25.75 

9.9 

21 

5.00 

36.0 

63 

15.50 

16.7 

105 

26.00 

13.8 

22 

5.25 

31.5 

64 

15.75 

15.2 

106 

26.25 

15.2 

23 

5.50 

28.9 

65 

16.00 

15.2 

107 

26.50 

15.2 

24 

5.75 

24.0 

66 

16.25 

15.2 

108 

26.75 

15.2 

25 

6.00 

17.7 

67 

16.50 

15.2 

109 

27.00 

15.2 

26 

6.25 

15.2 

68 

16.75 

15.3 

110 

27.25 

15.2 

27 

6.50 

15.2 

69 

17.00 

15.3 

111 

27.50 

15.2 

28 

6.75 

15.2 

70 

17.25 

15.3 

112 

27.75 

17.6 

29 

7.00 

15.2 

71 

17.50 

15.3 

113 

28.00 

21.4 

30 

7.25 

17.6 

72 

17.75 

15.2 

114 

28.25 

22.9 

31 

7.50 

21.4 

73 

18.00 

15.2 

115 

28.50 

22.9 

32 

7.75 

24.6 

74 

18.25 

15.2 

116 

28.75 

23.7 

33 

8.00 

27.4 

75 

18.50 

15.2 

117 

29.00 

25.1 

34 

8.25 

30.3 

76 

18.75 

15.2 

118 

29.25 

25.7 

35 

8.50 

33.3 

77 

19.00 

15.2 

119 

29.50 

25.8 

36 

8.75 

33.2 

78 

19.25 

15.2 

120 

29.75 

24.0 

37 

9.00 

31.3 

79 

19.50 

15.2 

121 

30.00 

21.0 

38 

9.25 

30.0 

80 

19.75 

13.1 

122 

30.25 

19.8 

39 

9.50 

29.2 

81 

20.00 

9.7 

123 

30.50 

19.7 

40 

9.75 

33.1 

82 

20.25 

8.4 

124 

30.75 

18.3 

41 

10.00 

40.1 

83 

20.50 

8.5 

125 

31.00 

16.1 

terji 

(meters) 

12.5 


leryt 

(meters) 

50.3 


ieryt 

(meters 

24.5 


i  eijj 

(meters) 

118.4 


terji 

(meters) 

79.9 
78.0 
76.0 

71.5 

65.1 

60.9 

58.2 

53.8 

48.1 
45.7 

45.7 

50.7 

59.1 

68.3 

78.2 

82.8 

83.5 

81.6 

77.8 
74.0 

70.2 

68.9 

69.4 

71.8 

75.5 

77.2 

77.3 
77.2 
77.0 

74.6 

70.7 

69.1 
69.0 
69.0 

68.9 

68.8 

68.6 

68.6 

68.6 

68.6 

68.6 

64.2 


i 

terXj 

(km) 

terji 

(meters 

337 

84.00 

56.7 

338 

84.25 

51.5 

339 

84.50 

48.1 

340 

84.75 

46.5 

341 

85.00 

46.0 

342 

85.25 

45.7 

343 

85.50 

45.7 

344 

85.75 

47.8 

345 

86.00 

51.3 

346 

86.25 

50.7 

347 

86.50 

47.2 

348 

86.75 

49.7 

349 

87.00 

56.5 

350 

87.25 

59.8 

351 

87.50 

60.6 

352 

87.75 

60.7 

353 

88.00 

60.2 

354 

88.25 

62.1 

355 

88.50 

65.9 

356 

88.75 

71.6 

357 

89.00 

78.9 

358 

89.25 

82.4 

359 

89.50 

83.4 

360 

89.75 

83.8 

361 

90.00 

83.8 

362 

90.25 

83.4 

363 

90.50 

82.6 

364 

90.75 

80.2 

365 

91.00 

76.7 

366 

91.25 

71.1 

367 

91.50 

64.0 

368 

91.75 

64.0 

369 

92.00 

69.1 

370 

92.25 

72.7 

371 

92.50 

75.2 

372 

92.75 

76.2 

373 

93.00 

76.2 

374 

93.25 

76.2 

Table  19.  Ground  types  for  test  case  CLSBDL. 


rgrndj 

yc 

yrng 

If,,;  lgC 

igrnd ,a 

(km) 

(dB) 

(km) 

1 

4 

0. 

-7. 

0. 

2 

3 

45. 

-10. 

45. 

aGround  composition  type:  0=sea  water;  1=fresh  water;  2=wet  ground;  3=medium  dry  ground; 
4=very  dry  ground;  5=ice  at  -1°C;  6=ice  at  -10°C;  7=user-defined  permittivity  and  conductivity. 


Table  20.  Terrain  profile  for  test  case  CLSBDWL  and  HF10TER. 


i 

terxj 

(km) 

tery , 

(meters) 

i 

ten, 

(km) 

terji 

(meters) 

i 

ten r, 

(km) 

tery , 

(meters) 

i 

0 

0 

34 

118.1818 

100 

67 

136.9318 

9 

2 

100 

0 

35 

118.75 

106 

68 

137.5 

6 

3 

100.5682 

2 

36 

119.3182 

100 

69 

138.0682 

5 

4 

101.1364 

2 

37 

119.8864 

108 

70 

138.6364 

7 

5 

101.7045 

2 

38 

120.4545 

89 

71 

139.2045 

5 

6 

102.2727 

3 

39 

121.0227 

90 

72 

139.7727 

8 

7 

102.8409 

4 

40 

121.5909 

95 

73 

140.3409 

14 

8 

103.4091 

5 

41 

122.1591 

89 

74 

140.9091 

7 

9 

103.9773 

4 

42 

122.7273 

107 

75 

141.4773 

12 

10 

104.5455 

7 

43 

123.2955 

97 

76 

142.0455 

10 

11 

105.1136 

6 

44 

123.8636 

108 

77 

142.6136 

8 

12 

105.6818 

9 

45 

124.4318 

87 

78 

143.1818 

14 

13 

106.25 

12 

46 

125 

76 

79 

143.75 

15 

14 

106.8182 

9 

47 

125.5682 

73 

80 

144.3182 

18 

15 

107.3864 

9 

48 

126.1364 

88 

81 

144.8864 

29 

16 

107.9545 

8 

49 

126.7045 

86 

82 

145.4545 

78 

17 

108.5227 

10 

50 

127.2727 

101 

83 

146.0227 

76 

18 

109.0909 

19 

51 

127.8409 

101 

84 

146.5909 

89 

19 

109.6591 

21 

52 

128.4091 

92 

85 

147.1591 

139 

20 

110.2273 

27 

53 

128.9773 

65 

86 

147.7273 

168 

21 

110.7955 

32 

54 

129.5455 

62 

87 

148.2955 

173 

22 

111.3636 

32 

55 

130.1136 

47 

88 

148.8636 

184 

23 

111.9318 

47 

56 

130.6818 

59 

89 

149.4318 

193 

24 

112.5 

43 

57 

131.25 

44 

90 

150 

232 

25 

113.0682 

58 

58 

131.8182 

33 

91 

150.5682 

227 

26 

113.6364 

82 

59 

132.3864 

21 

92 

151.1364 

264 

27 

114.2045 

75 

60 

132.9545 

20 

93 

151.7045 

222 

28 

114.7727 

96 

61 

133.5227 

21 

94 

152.2727 

267 

29 

115.3409 

63 

62 

134.0909 

11 

95 

152.8409 

247 

30 

115.9091 

100 

63 

134.6591 

7 

96 

153.4091 

287 

31 

116.4773 

123 

64 

135.2273 

7 

97 

153.9773 

363 

32 

117.0455 

98 

65 

135.7955 

4 

98 

154.5455 

427 

33 

117.6136 

95 

66 

136.3636 

12 

99 

155.1136 

399 

22 


Table  20.  Terrain  profile  for  test  case  CLSBDWL  and  HF10TER.  (Continued) 


i 

lerXj 

(km) 

teryt 

(meters) 

i 

terxj 

(km) 

teryt 

(meters) 

i 

ten r, 

(km) 

teryt 

(meters) 

100 

155.6818 

344 

142 

179.5455 

682 

184 

203.4091 

548 

101 

156.25 

258 

143 

180.1136 

544 

185 

203.9773 

551 

102 

156.8182 

188 

144 

180.6818 

477 

186 

204.5455 

546 

103 

157.3864 

182 

145 

181.25 

509 

187 

205.1136 

545 

104 

157.9545 

94 

146 

181.8182 

510 

188 

205.6818 

547 

105 

158.5227 

85 

147 

182.3864 

546 

189 

206.25 

556 

106 

159.0909 

63 

148 

182.9545 

582 

190 

206.8182 

569 

107 

159.6591 

43 

149 

183.5227 

844 

191 

207.3864 

576 

108 

160.2273 

18 

150 

184.0909 

873 

192 

207.9545 

610 

109 

160.7955 

16 

151 

184.6591 

776 

193 

208.5227 

636 

110 

161.3636 

16 

152 

185.2273 

819 

194 

209.0909 

634 

111 

161.9318 

13 

153 

185.7955 

830 

195 

209.6591 

704 

112 

162.5 

21 

154 

186.3636 

814 

196 

210.2273 

736 

113 

163.0682 

20 

155 

186.9318 

860 

197 

210.7955 

719 

114 

163.6364 

22 

156 

187.5 

870 

198 

211.3636 

702 

115 

164.2045 

26 

157 

188.0682 

993 

199 

211.9318 

714 

116 

164.7727 

27 

158 

188.6364 

901 

200 

212.5 

691 

117 

165.3409 

31 

159 

189.2045 

886 

201 

213.0682 

676 

118 

165.9091 

45 

160 

189.7727 

946 

202 

213.6364 

671 

119 

166.4773 

58 

161 

190.3409 

911 

203 

214.2045 

671 

120 

167.0455 

64 

162 

190.9091 

1025 

204 

214.7727 

708 

121 

167.6136 

87 

163 

191.4773 

1123 

205 

215.3409 

668 

122 

168.1818 

92 

164 

192.0455 

1262 

206 

215.9091 

674 

123 

168.75 

112 

165 

192.6136 

1424 

207 

216.4773 

688 

124 

169.3182 

124 

166 

193.1818 

1460 

208 

217.0455 

638 

125 

169.8864 

144 

167 

193.75 

1442 

209 

217.6136 

661 

126 

170.4545 

178 

168 

194.3182 

1348 

210 

218.1818 

652 

127 

171.0227 

154 

169 

194.8864 

1152 

211 

218.75 

673 

128 

171.5909 

172 

170 

195.4545 

940 

212 

219.3182 

673 

129 

172.1591 

192 

171 

196.0227 

1256 

213 

219.8864 

665 

130 

172.7273 

192 

172 

196.5909 

1111 

214 

220.4545 

703 

131 

173.2955 

196 

173 

197.1591 

943 

215 

221.0227 

671 

132 

173.8636 

216 

174 

197.7273 

1037 

216 

221.5909 

685 

133 

174.4318 

222 

175 

198.2955 

931 

217 

222.1591 

730 

134 

175 

234 

176 

198.8636 

759 

218 

222.7273 

722 

135 

175.5682 

236 

177 

199.4318 

673 

219 

223.2955 

737 

136 

176.1364 

262 

178 

200 

702 

220 

223.8636 

709 

137 

176.7045 

287 

179 

200.5682 

607 

221 

224.4318 

752 

138 

177.2727 

372 

180 

201.1364 

649 

222 

225 

767 

139 

177.8409 

546 

181 

201.7045 

576 

223 

225.5682 

774 

140 

178.4091 

699 

182 

202.2727 

551 

224 

226.1364 

728 

141 

178.9773 

821 

183 

202.8409 

548 

225 

226.7045 

749 

23 


Table  20. 1 

rerrain  pro 

file  for  test  case  CLS 

BDWL  and 

1  HF10TER.  (Continued) 

terXi 

teryt 

terxj 

teryt 

ten 

teryt 

i 

(km) 

(meters) 

i 

(km) 

(meters) 

i 

(km) 

(meters) 

226 

227.2727 

761 

240 

235.2273 

1094 

254 

243.1818 

964 

227 

227.8409 

759 

241 

235.7955 

1249 

255 

243.75 

897 

228 

228.4091 

815 

242 

236.3636 

1334 

256 

244.3182 

861 

229 

228.9773 

836 

243 

236.9318 

1286 

257 

244.8864 

806 

230 

229.5455 

896 

244 

237.5 

1235 

258 

245.4545 

796 

231 

230.1136 

924 

245 

238.0682 

1181 

259 

246.0227 

780 

232 

230.6818 

956 

246 

238.6364 

1165 

260 

246.5909 

773 

233 

231.25 

1136 

247 

239.2045 

1196 

261 

247.1591 

767 

234 

231.8182 

1187 

248 

239.7727 

1207 

262 

247.7273 

764 

235 

232.3864 

1353 

249 

240.3409 

1257 

263 

248.2955 

761 

236 

232.9545 

1313 

250 

240.9091 

1177 

264 

248.8636 

753 

237 

233.5227 

1153 

251 

241.4773 

1237 

265 

249.4318 

750 

238 

234.0909 

1111 

252 

242.0455 

1186 

239 

234.6591 

1095 

253 

242.6136 

1085 

Table  21 .  Ground  types  for  test  case  CLSBDWL 


rgrndt 

yc 

yrng 

1gr>  Igc 

igrndf 

(km) 

(dB) 

(km) 

1 

0 

0. 

-5. 

0. 

2 

4 

100. 

-10. 

100. 

Table  22.  Terrain  profile  for  test  case  FLTA50. 


terxt 

teryt 

i 

(km) 

(meters) 

i 

0. 

10. 

2 

50. 

10. 

24 


Table  23.  Terrain  profile  for  test  case  HEIGHT_RTG. 


i 

terxj 

(km) 

teryi 

(meters) 

i 

terxj 

(km) 

teiji 

(meters) 

i 

tent 

(km) 

teiji 

(meters) 

i 

0.000 

299.505 

43 

2.552 

194.509 

85 

5.104 

129.424 

2 

0.061 

293.102 

44 

2.613 

191.783 

86 

5.165 

128.345 

3 

0.122 

285.291 

45 

2.674 

189.084 

87 

5.226 

126.420 

4 

0.182 

275.476 

46 

2.734 

186.385 

88 

5.286 

124.172 

5 

0.243 

274.000 

47 

2.795 

184.601 

89 

5.347 

122.607 

6 

0.304 

282.185 

48 

2.856 

183.542 

90 

5.408 

122.185 

7 

0.365 

295.347 

49 

2.917 

183.000 

91 

5.469 

121.980 

8 

0.425 

302.937 

50 

2.977 

182.743 

92 

5.529 

119.549 

9 

0.486 

303.296 

51 

3.038 

182.000 

93 

5.590 

115.950 

10 

0.547 

303.015 

52 

3.099 

182.000 

94 

5.651 

112.351 

11 

0.608 

304.000 

53 

3.160 

182.000 

95 

5.712 

109.501 

12 

0.668 

303.744 

54 

3.220 

179.587 

96 

5.772 

106.397 

13 

0.729 

300.168 

55 

3.281 

174.642 

97 

5.833 

103.135 

14 

0.790 

296.820 

56 

3.342 

169.241 

98 

5.894 

100.155 

15 

0.851 

292.997 

57 

3.403 

164.599 

99 

5.955 

97.891 

16 

0.911 

287.759 

58 

3.463 

160.716 

100 

6.015 

96.565 

17 

0.972 

281.854 

59 

3.524 

156.889 

101 

6.076 

96.000 

18 

1.033 

276.646 

60 

3.585 

153.416 

102 

6.137 

96.030 

19 

1.094 

272.799 

61 

3.646 

151.279 

103 

6.198 

96.592 

20 

1.154 

269.115 

62 

3.706 

147.165 

104 

6.258 

97.472 

21 

1.215 

263.611 

63 

3.767 

143.896 

105 

6.319 

98.371 

22 

1.276 

257.254 

64 

3.828 

139.232 

106 

6.380 

99.271 

23 

1.337 

245.911 

65 

3.889 

134.218 

107 

6.441 

100.171 

24 

1.398 

243.898 

66 

3.950 

128.083 

108 

6.502 

101.071 

25 

1.458 

243.155 

67 

4.010 

124.264 

109 

6.562 

101.970 

26 

1.519 

240.320 

68 

4.071 

123.043 

110 

6.623 

103.117 

27 

1.580 

237.236 

69 

4.132 

122.844 

111 

6.684 

104.770 

28 

1.641 

235.571 

70 

4.193 

123.099 

112 

6.745 

105.716 

29 

1.701 

233.148 

71 

4.253 

123.944 

113 

6.805 

107.516 

30 

1.762 

228.323 

72 

4.314 

124.425 

114 

6.866 

108.996 

31 

1.823 

224.033 

73 

4.375 

123.526 

115 

6.927 

110.273 

32 

1.884 

219.266 

74 

4.436 

123.481 

116 

6.988 

111.914 

33 

1.944 

214.502 

75 

4.496 

123.203 

117 

7.048 

113.714 

34 

2.005 

213.180 

76 

4.557 

122.460 

118 

7.109 

115.514 

35 

2.066 

213.000 

77 

4.618 

121.908 

119 

7.170 

117.313 

36 

2.127 

212.574 

78 

4.679 

121.691 

120 

7.231 

119.113 

37 

2.187 

211.037 

79 

4.739 

121.538 

121 

7.291 

120.858 

38 

2.248 

208.621 

80 

4.800 

121.278 

122 

7.352 

122.435 

39 

2.309 

205.922 

81 

4.861 

122.138 

123 

7.413 

126.256 

40 

2.370 

203.222 

82 

4.922 

128.631 

124 

7.474 

129.869 

41 

2.430 

200.523 

83 

4.982 

131.102 

125 

7.534 

133.931 

42 

2.491 

197.785 

84 

5.043 

130.169 

126 

7.595 

138.091 

i 

terxj 

(km) 

terji 

(meters) 

i 

terxj 

(km) 

tery y 

(meters) 

i 

tent 

(km) 

tery , 

(meters) 

27 

7.656 

143.134 

169 

10.208 

177.921 

211 

12.760 

155.000 

28 

7.717 

146.594 

170 

10.269 

177.924 

212 

12.821 

155.000 

29 

7.778 

148.177 

171 

10.329 

177.827 

213 

12.881 

155.000 

30 

7.838 

149.890 

172 

10.390 

177.204 

214 

12.942 

155.000 

31 

7.899 

150.397 

173 

10.451 

177.540 

215 

13.003 

155.000 

32 

7.960 

150.576 

174 

10.512 

177.876 

216 

13.064 

155.000 

33 

8.021 

149.898 

175 

10.573 

176.820 

217 

13.125 

155.000 

34 

8.081 

146.486 

176 

10.633 

176.887 

218 

13.185 

155.000 

35 

8.142 

148.353 

177 

10.694 

177.890 

219 

13.246 

155.000 

36 

8.203 

150.580 

178 

10.755 

179.717 

220 

13.307 

155.000 

37 

8.264 

151.340 

179 

10.816 

183.114 

221 

13.368 

155.000 

38 

8.324 

151.342 

180 

10.876 

187.030 

222 

13.428 

155.000 

39 

8.385 

151.344 

181 

10.937 

187.587 

223 

13.489 

155.000 

40 

8.446 

151.346 

182 

10.998 

186.186 

224 

13.550 

155.000 

41 

8.507 

151.349 

183 

11.059 

184.961 

225 

13.611 

155.000 

42 

8.567 

151.351 

184 

11.119 

181.541 

226 

13.671 

155.000 

43 

8.628 

151.354 

185 

11.180 

176.874 

227 

13.732 

155.000 

44 

8.689 

148.733 

186 

11.241 

170.821 

228 

13.793 

155.000 

45 

8.750 

146.851 

187 

11.302 

166.223 

229 

13.854 

155.000 

46 

8.810 

145.405 

188 

11.362 

162.408 

230 

13.914 

155.000 

47 

8.871 

144.259 

189 

11.423 

159.207 

231 

13.975 

155.000 

48 

8.932 

141.215 

190 

11.484 

157.475 

232 

14.036 

155.000 

49 

8.993 

137.404 

191 

11.545 

154.210 

233 

14.097 

155.000 

50 

9.053 

135.142 

192 

11.605 

152.143 

234 

14.157 

155.000 

51 

9.114 

131.871 

193 

11.666 

156.158 

235 

14.218 

155.000 

52 

9.175 

133.486 

194 

11.727 

158.057 

236 

14.279 

155.000 

53 

9.236 

135.960 

195 

11.788 

158.445 

237 

14.340 

155.000 

54 

9.297 

138.960 

196 

11.849 

158.874 

238 

14.401 

155.000 

55 

9.357 

141.996 

197 

11.909 

159.644 

239 

14.461 

155.109 

56 

9.418 

145.272 

198 

11.970 

159.410 

240 

14.522 

155.337 

57 

9.479 

149.519 

199 

12.031 

158.268 

241 

14.583 

155.336 

58 

9.540 

152.000 

200 

12.092 

157.187 

242 

14.644 

155.327 

59 

9.600 

152.000 

201 

12.152 

155.000 

243 

14.704 

155.026 

60 

9.661 

152.149 

202 

12.213 

155.000 

244 

14.765 

155.000 

61 

9.722 

152.765 

203 

12.274 

155.000 

245 

14.826 

155.000 

62 

9.783 

153.698 

204 

12.335 

155.000 

246 

14.887 

155.000 

63 

9.843 

155.393 

205 

12.395 

155.000 

247 

14.947 

155.000 

64 

9.904 

158.023 

206 

12.456 

155.000 

248 

15.008 

155.000 

65 

9.965 

161.649 

207 

12.517 

155.000 

249 

15.069 

155.000 

66 

10.026 

165.081 

208 

12.578 

155.000 

250 

15.130 

155.000 

67 

10.086 

169.421 

209 

12.638 

155.000 

251 

15.190 

155.526 

68 

10.147 

174.600 

210 

12.699 

155.000 

252 

15.251 

159.420 

Table  23.  Terrain  profile  for  test  case  HEIGHT  RTG. 


i 

terxj 

(km) 

teiyt 

(meters) 

i 

terXi 

(km) 

terji 

(meters) 

i 

terXi 

(km) 

teryi 

(meters) 

253 

15.312 

163.313 

271 

16.406 

182.000 

289 

17.499 

194.094 

254 

15.373 

166.669 

272 

16.466 

182.000 

290 

17.560 

193.410 

255 

15.433 

169.488 

273 

16.527 

182.000 

291 

17.621 

193.332 

256 

15.494 

172.388 

274 

16.588 

182.000 

292 

17.682 

192.703 

257 

15.555 

174.689 

275 

16.649 

182.000 

293 

17.742 

192.442 

258 

15.616 

176.772 

276 

16.709 

182.000 

294 

17.803 

191.841 

259 

15.677 

178.643 

277 

16.770 

182.000 

295 

17.864 

191.503 

260 

15.737 

179.691 

278 

16.831 

182.000 

296 

17.925 

191.423 

261 

15.798 

181.120 

279 

16.892 

182.000 

297 

17.985 

191.425 

262 

15.859 

182.000 

280 

16.953 

182.000 

298 

18.046 

191.014 

263 

15.920 

182.000 

281 

17.013 

182.000 

299 

18.107 

190.116 

264 

15.980 

182.000 

282 

17.074 

182.000 

300 

18.168 

189.431 

265 

16.041 

182.000 

283 

17.135 

182.000 

301 

18.229 

189.545 

266 

16.102 

182.000 

284 

17.196 

182.000 

302 

18.289 

190.451 

267 

16.163 

182.000 

285 

17.256 

182.000 

303 

18.350 

191.606 

268 

16.223 

182.000 

286 

17.317 

186.555 

304 

18.411 

193.116 

269 

16.284 

182.000 

287 

17.378 

191.465 

270 

16.345 

182.000 

288 

17.439 

193.821 

Table  24.  Ground  types  for  test  case  HF10TER. 


rgrndj 

dielec 

lgr,  lgc 

igmdf 

(km) 

{*<*? 

1 

7 

0. 

(80.,  4.0) 

2 

7 

80. 

(5.0,  0.0001) 

a£  r~  relative  permittivity;  <j-  conductivity  (S/m) 


Table  25.  Terrain  profile  for  test  case  MPRT. 


i 

terXi 

(km) 

teiy , 

(meters) 

1 

0. 

0. 

2 

10. 

0. 

3 

30. 

600. 

4 

50. 

0. 

5 

60. 

0. 
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Table  26.  Terrain  profile  for  test  case  PERW. 


i 

terxi 

(km) 

tery, 

(meters) 

1 

0. 

0. 

2 

18.75 

0. 

3 

20.312 

210. 

4 

21.875 

320. 

5 

23.4375 

375. 

6 

25.00 

390. 

7 

26.565 

375. 

8 

28.125 

320. 

9 

31.250 

90. 

10 

32.8125 

0. 

11 

50.00 

0. 

Table  27.  Terrain  profile  for  test  case  PVT. 


i 

terxi 

(km) 

teryi 

(meters) 

1 

0.00 

625. 

2 

3.17 

476. 

3 

6.34 

347. 

4 

9.51 

239. 

5 

12.69 

151. 

6 

15.87 

83. 

7 

19.04 

35. 

8 

22.22 

7. 

9 

25.00 

0. 

10 

27.78 

7. 

11 

30.96 

35. 

12 

34.13 

83. 

13 

37.13 

151. 

14 

40.49 

239. 

15 

43.66 

347. 

16 

46.83 

476. 

17 

50. 

625. 

Table  28.  Terrain  profile  for  test  case  RDLONGB  and  TROPOT. 


i 

terxi 

(km) 

teryi 

(meters) 

i 

terxi 

(km) 

teryi 

(meters) 

i 

terxi 

(km) 

ter\>i 

(meters) 

39 

14.40 

6.0 

95 

73.80 

0.0 

151 

92.10 

2.0 

40 

14.70 

7.0 

96 

74.10 

1.0 

152 

92.40 

10.0 

41 

15.00 

8.0 

97 

74.40 

1.0 

153 

92.70 

4.0 

42 

15.30 

8.0 

98 

74.70 

10.0 

154 

93.00 

1.0 

43 

15.60 

9.0 

99 

75.00 

8.0 

155 

93.30 

1.0 

44 

15.90 

10.0 

100 

75.30 

39.0 

156 

93.60 

0.0 

45 

16.20 

11.0 

101 

75.60 

45.0 

157 

93.90 

1.0 

46 

16.50 

11.0 

102 

75.90 

53.0 

158 

96.30 

1.0 

47 

16.80 

12.0 

103 

76.20 

61.0 

159 

96.60 

0.0 

48 

17.40 

12.0 

104 

76.50 

61.0 

160 

96.90 

1.0 

49 

17.70 

13.0 

105 

76.80 

82.0 

161 

97.50 

1.0 

50 

18.00 

13.0 

106 

77.10 

61.0 

162 

97.80 

2.0 

51 

18.30 

14.0 

107 

77.40 

78.0 

163 

98.10 

3.0 

52 

18.60 

15.0 

108 

77.70 

61.0 

164 

99.30 

3.0 

53 

18.90 

16.0 

109 

78.00 

129.0 

165 

99.60 

2.0 

54 

19.20 

18.0 

110 

78.30 

30.0 

166 

99.90 

2.0 

55 

19.50 

20.0 

111 

78.60 

46.0 

167 

100.20 

1.0 

56 

19.80 

21.0 

112 

78.90 

159.0 

Table  29.  Ground  types  for  test  case  RDLONGB  and  TROPOT. 


lgr 

igrndi a 

rgrndj 

(km) 

1 

2 

0. 

2 

0 

28.5 

3 

3 

64.8 

4 

0 

68.7 

5 

4 

74.1 

6 

0 

100.2 

aGround  composition  type:  0=sea  water;  1=fresh  water;  2=wet  ground;  3=medium  dry  ground; 
4=very  dry  ground;  5=ice  at  -1°C;  6=ice  at  -10°C;  7=user-defined  permittivity  and  conductivity. 


Table  30.  Terrain  profile  for  test  case  VERTMIX. 


terxi 

teryi 

rgrndi 

i 

(km) 

(meters) 

lgr 

igrndi a 

(km) 

1 

0. 

0. 

1 

4 

0. 

2 

50. 

0. 

2 

0 

25.0 

a 

Ground  composition  type:  0=sea  water;  1=fresh  water;  2=wet  ground;  3=medium  dry  ground; 
4=very  dry  ground;  5=ice  at  -1°C;  6=ice  at  -10°C;  7=user-defined  permittivity  and  conductivity. 
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Table  31.  Terrain  profile  for  test  case  VERTUSRD. 


terxi 

teryt 

i 

(km) 

(meters) 

1 

0. 

0. 

2 

50. 

0. 

Table  32.  Terrain  profile  for  test  case  WEDGE. 


i 

terxj 

(km) 

tery, 

(meters) 

1 

0. 

0. 

2 

45.0 

0. 

3 

50.0 

200. 

4 

55.0 

0. 

5 

100.0 

0. 

4.4  EXPECTED  TEST  RESULTS 

The  expected  test  results  listing  propagation  loss  versus  height  values  for  each  of 
the  48  test  cases  are  listed  in  tabular  form  inTable  33  through  Table  80. 
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Table  33.  Expected  output  for  ABSORB 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

10.0 

212.7 

-60.2 

20.0 

199.3 

-46.8 

30.0 

188.9 

-36.5 

40.0 

180.1 

-27.6 

50.0 

172.2 

-19.8 

60.0 

165.5 

-13 

70.0 

160.1 

-7.6 

80.0 

156.7 

-4.3 

90.0 

156.5 

-4 

100.0 

163.2 

-10.7 

110.0 

159.3 

-6.9 

120.0 

156 

-3.6 

130.0 

167.8 

-15.3 

140.0 

155.7 

-3.3 

150.0 

163 

-10.5 

160.0 

156.1 

-3.6 

170.0 

161.9 

-9.4 

180.0 

155.7 

-3.3 

190.0 

164.5 

-12 

200.0 

154.9 

-2.5 

Table  34.  Expected  output  for  AFEVAP 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

50 

133.7 

2.3 

100 

143.8 

-7.8 

150 

135.8 

0.2 

200 

131.1 

4.9 

250 

142 

-6.1 

300 

132.1 

3.9 

350 

133.1 

2.8 

400 

135.7 

0.2 

450 

131.2 

4.8 

500 

139.7 

-3.7 

550 

130.4 

5.6 

600 

146.5 

-10.5 

650 

130.1 

5.8 

700 

163.8 

-27.8 

750 

130.1 

5.9 

800 

154.5 

-18.6 

850 

130.1 

5.9 

900 

147.1 

-11.2 

950 

130.2 

5.8 

1000 

142.8 

-6.8 
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Table  35.  Expected  output  for  AFSBD 
for  rmax  receiver  range  of  100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

150 

138.8 

3.2 

300 

166.3 

-24.3 

450 

156.2 

-14.2 

600 

143.1 

-1.1 

750 

140.1 

1.9 

900 

148.9 

-6.9 

1050 

138 

4 

1200 

143.9 

-1.9 

1350 

139.7 

2.3 

1500 

138 

4 

1650 

155.6 

-13.6 

1800 

137.1 

4.9 

1950 

139.6 

2.4 

2100 

147.8 

-5.8 

2250 

136.8 

5.2 

2400 

139.1 

2.8 

2550 

151.9 

-9.9 

2700 

137.2 

4.8 

2850 

137.5 

4.5 

3000 

155.1 

-13.1 

Table  36.  Expected  Output  for  AFSTD 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

50 

143.8 

-17.4 

100 

133.6 

-7.2 

150 

127.3 

-0.8 

200 

123.3 

3.1 

250 

121.3 

5.2 

300 

121.1 

5.3 

350 

123.2 

3.3 

400 

129.7 

-3.3 

450 

137.6 

-11.2 

500 

124.9 

1.5 

550 

121.3 

5.1 

600 

120.6 

5.8 

650 

122.3 

4.1 

700 

128.1 

-1.7 

750 

141.2 

-14.8 

800 

125.3 

1.1 

850 

121.3 

5.1 

900 

120.5 

5.9 

950 

122.1 

4.3 

1000 

127.6 

-1.1 
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Table  37.  Expected  Output  for 
AIRBORNE  for  rmax  receiver  range  of 
250  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

250 

136.9 

2.6 

500 

136 

3.5 

750 

138.1 

1.4 

1000 

140 

-0.5 

1250 

138.2 

1.3 

1500 

133.1 

6.4 

1750 

142.8 

-3.3 

2000 

142.4 

-2.9 

2250 

143 

-3.5 

2500 

142.4 

-2.9 

2750 

141.9 

-2.4 

3000 

136.9 

2.6 

3250 

141 

-1.5 

3500 

141 

-1.5 

3750 

139.5 

0 

4000 

143.2 

-3.7 

4250 

140 

-0.5 

4500 

144 

-4.5 

4750 

138.4 

1.1 

5000 

138.9 

0.6 

Table  38.  Expected  output  for  BLOCK 
for  rmax  receiver  range  of  60  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

-3276.6 

-3276.6 

20 

216.1 

-88.1 

40 

209.4 

-81.4 

60 

207.8 

-79.8 

80 

209 

-81 

100 

207.2 

-79.2 

120 

203 

-75 

140 

200.7 

-72.7 

160 

198.6 

-70.6 

180 

195.1 

-67 

200 

191.6 

-63.6 

220 

188.2 

-60.2 

240 

184.4 

-56.4 

260 

180.6 

-52.6 

280 

176.9 

-48.9 

300 

173.3 

-45.3 

320 

170 

-42 

340 

167.1 

-39.1 

360 

164.7 

-36.7 

380 

162.6 

-34.6 

400 

160.7 

-32.7 
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119.9 

-7.4 

121.7 

-3.3 

3276.7 

-3276. 

3276.7 

-3276. 

133.2 

-6.8 

135.8 

-7.8 

137.8 

-8.4 

139.5 

-9 

141.1 

-9.6 

142.6 

-10.2 

144 

-10.7 

145.2 

-11.2 

146.3 

-11.6 

147.3 

-11.9 

148.2 

-12.2 

149 

-12.5 

149.8 

-12.7 

150.5 

-13 

151.3 

-13.3 

152 

-13.6 

152.8 

-13.9 

153.5 

-14.2 

154.2 

-14.5 

154.9 

-14.8 

155.5 

-15.1 

156.1 

-15.4 

156.8 

-15.7 

157.4 

-16 

158 

-16.3 

158.5 

-16.5 

159.1 

-16.8 

159.6 

-17 

160.1 

-17.3 

160.6 

-17.5 

Rec.  he 

ight  at  0  m 

Rec.  heig 

ht  at  500  m 

ange 

km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

CNR 

(dB) 

35 

161 

-17.7 

145.4 

-2 

-6.6 

36 

161.4 

-17.9 

143.8 

-0.2 

-7.3 

37 

161.8 

-18 

144.6 

-0.8 

-8 

38 

162.2 

-18.1 

146.4 

-2.4 

-9.2 

39 

162.5 

-18.2 

144.1 

0.1 

-9.8 

40 

162.9 

-18.4 

145.9 

-1.5 

-10.4 

41 

163.2 

-18.5 

145.5 

-0.8 

-11 

42 

163.6 

-18.6 

145.1 

-0.2 

-11.6 

43 

163.9 

-18.8 

146.7 

-1.6 

-12.2 

44 

164.2 

-18.9 

145 

0.3 

-12.7 

45 

164.6 

-19.1 

147.1 

-1.6 

-13.3 

46 

164.9 

-19.2 

145.5 

0.2 

-13.8 

47 

165.2 

-19.3 

146.6 

-0.7 

-14.4 

48 

165.5 

-19.5 

146.9 

-0.8 

-14.9 

49 

165.8 

-19.6 

145.6 

0.6 

-15.5 

50 

166.2 

-19.8 

148.9 

-2.4 

-16.1 

51 

166.5 

-19.9 

145.6 

1 

-16.7 

52 

166.9 

-20.1 

147.7 

-1 

-17.3 

53 

167.2 

-20.3 

148.2 

-1.2 

-17.9 

54 

167.6 

-20.5 

145.8 

1.3 

-18.6 

55 

168 

-20.7 

149 

-1.7 

-19.2 

56 

168.4 

-20.9 

148.3 

-0.9 

-19.9 

57 

168.7 

-21.2 

146.1 

1.4 

-20.6 

58 

169.1 

-21.4 

148.9 

-1.2 

-21.3 

59 

169.5 

-21.6 

149.7 

-1.9 

-22 

60 

169.9 

-21.9 

146.7 

1.3 

-22.7 

61 

170.2 

-22.1 

147.7 

0.4 

-23.3 

62 

170.6 

-22.3 

151.2 

-2.9 

-23.9 

63 

170.9 

-22.4 

146.2 

2.2 

-24.5 

64 

171.2 

-22.6 

148.1 

0.5 

-25 

65 

171.5 

-22.8 

152 

-3.3 

-25.5 

66 

171.7 

-22.9 

152.1 

-3.3 

-26 

67 

172 

-23 

148.7 

0.3 

-26.4 

68 

172.2 

-23.1 

147 

2.1 

-26.8 

69 

172.4 

-23.2 

147.6 

1.6 

-27.2 

70 

172.7 

-23.3 

150.1 

-0.7 

-27.5 

tec.  he 

ght  at  0  m 

Rec.  heig 

it  at  500  m 

'op. 

Prop. 

Prop. 

Prop. 

CNR 

css 

Factor 

Loss 

Factor 

(dB) 

jB) 

(dB) 

(dB) 

(dB) 

72.9 

-23.4 

153.6 

-4.2 

-27.9 

?3.1 

-23.5 

151.7 

-2.1 

-28.2 

?3.3 

-23.5 

147.8 

1.9 

-28.6 

?3.5 

-23.6 

147.7 

2.1 

-28.9 

73.7 

-23.7 

151.2 

-1.3 

-29.3 

73.9 

-23.8 

155.2 

-5.1 

-29.6 

74A 

-23.9 

152.6 

-2.4 

-30 

?4.3 

-24 

148.8 

1.5 

-30.4 

?4.5 

-24.1 

148.1 

2.3 

-30.8 

?4.8 

-24.2 

149.8 

0.7 

-31.2 

75 

-24.4 

154 

-3.4 

-31.6 

75.2 

-24.5 

155.9 

-5.2 

-32 

75.5 

-24.7 

152 

-1.2 

-32.5 

75.7 

-24.8 

149.6 

1.3 

-32.9 

76 

-25 

149 

2 

-33.4 

76.3 

-25.1 

150 

1.2 

-33.9 

76.5 

-25.3 

152.5 

-1.3 

-34.3 

76.8 

-25.5 

156.8 

-5.5 

-34.8 

77 

-25.6 

159.4 

-7.9 

-35.3 

77 .3 

-25.8 

157 

-5.5 

-35.8 

77.8 

-25.9 

153.5 

-1.8 

-36.2 

77.8 

-26.1 

151.4 

0.3 

-36.7 

78 

-26.2 

150.6 

1.3 

-37.1 

78.3 

-26.4 

150.6 

1.4 

-37.5 

78.5 

-26.5 

151.3 

0.7 

-37.9 

78.7 

-26.6 

152.7 

-0.6 

-38.3 

78.9 

-26.8 

154.8 

-2.7 

-38.7 

79.2 

-26.9 

157.9 

-5.6 

-39.1 

79.4 

-27 

161.5 

-9.1 

-39.4 

79.6 

-27.1 

162.8 

-10.3 

-39.8 

clutter-to-noise  ratio  (CNR). 


ange 

km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

CNR 

(dB) 

1 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

-33.7 

2 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

54.8 

3 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

81.8 

4 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

80.1 

5 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

36.8 

6 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

28.1 

7 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

65.3 

8 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

88.7 

9 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

76.9 

10 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

90.8 

11 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

77.6 

12 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

89.9 

13 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

59.2 

14 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

64.5 

15 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

67.3 

16 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

56.8 

17 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

61.7 

18 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

64 

19 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

64.5 

20 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

46.3 

21 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

71.5 

22 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

47.9 

23 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

57.8 

24 

-3276.7 

-3276.7 

-3276.7 

-3276.7 

46.2 

25 

129.5 

0.5 

-3276.7 

-3276.7 

59.1 

26 

130.8 

-0.5 

-3276.7 

-3276.7 

93.3 

27 

130.3 

0.3 

-3276.7 

-3276.7 

61 

28 

131.9 

-1 

-3276.7 

-3276.7 

96.5 

29 

132 

-0.8 

-3276.7 

-3276.7 

82.1 

30 

131.6 

-0.1 

-3276.7 

-3276.7 

42.4 

31 

133.2 

-1.4 

-3276.7 

-3276.7 

35.2 

32 

131.7 

0.4 

-3276.7 

-3276.7 

49.5 

33 

132.7 

-0.4 

-3276.7 

-3276.7 

14.4 

34 

133 

-0.4 

-3276.7 

-3276.7 

30.6 

35 

134.1 

-1.2 

-3276.7 

-3276.7 

34.5 

36 

134.3 

-1.2 

-3276.7 

-3276.7 

19.7 

Table  40.  Expected  output  for  CLSBDL  for  receiver  height  of  500  and  1000  m,  plus 

clutter-to-noise  ratio  (CNR). 


Rec.  height  at  500  m 

Rec.  height  at  1000  m 

Range 

(km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

CNR 

(dB) 

73 

146.3 

-7.1 

139.6 

-0.4 

15.1 

74 

151.9 

-12.6 

142.2 

-2.9 

22 

75 

140.3 

-0.8 

139.7 

-0.2 

-1.6 

76 

143.7 

-4.1 

142.4 

-2.8 

5 

77 

147.3 

-7.5 

141.6 

-1.8 

48 

78 

158 

-18.2 

139.7 

0.1 

29.5 

79 

150.2 

-10.3 

142.4 

-2.4 

29.6 

80 

144.9 

-4.9 

142.8 

-2.8 

46.6 

81 

150 

-9.9 

141 

-0.8 

21.6 

82 

147.8 

-7.5 

141.9 

-1.7 

30.3 

83 

148.8 

-8.4 

142.1 

-1.7 

38.5 

84 

156.8 

-16.3 

142.5 

-2.1 

1.5 

85 

147.6 

-7 

144.5 

-4 

18.6 

86 

144.7 

-4.1 

143.9 

-3.2 

32.3 

87 

145.2 

-4.4 

141.1 

-0.3 

51.8 

88 

154.3 

-13.5 

140.6 

0.3 

36.3 

89 

146.9 

-6 

142 

-1.1 

77.7 

90 

147.5 

-6.4 

142.7 

-1.6 

53.4 

91 

163.6 

-22.4 

142.3 

-1.1 

13.4 

92 

150.9 

-9.7 

142.5 

-1.2 

17.4 

93 

147.9 

-6.5 

143.1 

-1.8 

50.1 

94 

153.3 

-11.9 

143.2 

-1.8 

48.1 

95 

149.8 

-8.2 

143.6 

-2 

39.5 

96 

151.5 

-9.8 

143.7 

-2.1 

46.8 

97 

147.9 

-6.2 

142.7 

-1 

53.2 

98 

149.8 

-8 

144.9 

-3.1 

48 

99 

157.8 

-15.9 

148 

-6.1 

39.6 

100 

161.9 

-20 

149.3 

-7.3 

47.4 

40 


Table  41 .  Expected  output  for  CLSBDW  for  receiver  height  of  500  and  1000  m,  plus 

clutter-to-noise  ratio  (CNR). 


Rec.  height  at  500  m 

Rec.  height  at  1000  m 

Range 

(km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

CNR 

(dB) 

1 

102.9 

0 

104.9 

0 

91.8 

2 

108.3 

0 

109 

0 

90.9 

3 

111.6 

0 

112 

0 

81.3 

4 

114.1 

0 

114.3 

0 

72.4 

5 

116 

0 

116.1 

0 

65.2 

6 

117.6 

0 

117.7 

0 

59.3 

7 

118.9 

0 

119 

0 

53.6 

8 

120 

0 

120.1 

0 

48.1 

9 

121.1 

0 

121.1 

0 

42.8 

10 

122 

0 

122 

0 

36.9 

11 

122.8 

0 

122.9 

0 

33 

12 

123.6 

0 

123.6 

0 

29.5 

13 

124.3 

0 

124.3 

0 

26.2 

14 

124.9 

0 

124.9 

0 

22.9 

15 

125.5 

0 

125.5 

0 

19.6 

16 

126.1 

0 

126.1 

0 

16.3 

17 

126.6 

0 

126.6 

0 

13.5 

18 

127.1 

0 

127.1 

0 

10.5 

19 

127.5 

0 

127.6 

0 

7.5 

20 

128 

0 

128.1 

0 

4.2 

21 

128.4 

0 

128.5 

-0.1 

1 

22 

128.8 

0 

128.9 

-0.1 

-0.9 

23 

129.2 

0 

129.3 

-0.1 

-4.7 

24 

129.6 

0 

129.7 

-0.1 

-7.1 

25 

129.9 

0 

130 

-0.1 

-10.6 

26 

130.3 

0 

130.4 

-0.1 

-12.5 

27 

130.6 

0 

130.7 

-0.1 

-20.9 

28 

130.9 

0 

131 

-0.1 

-19 

29 

131.2 

0 

131.3 

-0.1 

-18.6 

30 

131.5 

0 

131.6 

-0.1 

-28.3 

31 

131.8 

0 

131.9 

-0.1 

-29 

32 

132.1 

0 

132.2 

-0.1 

-28 

33 

132.4 

0 

132.5 

-0.1 

-37.6 

34 

132.5 

0.1 

132.8 

-0.1 

-37.5 

35 

132.9 

-0.1 

133 

-0.1 

-27.7 

36 

133.5 

-0.4 

133.3 

-0.2 

-47.2 

41 


Expected  output  for  CLSBDW  f< 
clutter-to-nois 

Rec.  height  at  500  m 

ange 

km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

37 

134.1 

-0.8 

38 

134.3 

-0.7 

39 

134.2 

-0.4 

40 

133.8 

0.3 

41 

133.3 

0.9 

42 

133.2 

1.3 

43 

133.3 

1.4 

44 

133.8 

1.1 

45 

134.6 

0.5 

46 

135.6 

-0.4 

47 

136.9 

-1.5 

48 

138.2 

-2.6 

49 

139.3 

-3.5 

50 

139.8 

-3.8 

51 

139.5 

-3.3 

52 

138.6 

-2.3 

53 

137.9 

-1.4 

54 

137.1 

-0.4 

55 

136.4 

0.4 

56 

135.9 

1.1 

57 

135.5 

1.6 

58 

135.3 

1.9 

59 

135.3 

2.1 

60 

135.3 

2.3 

61 

135.4 

2.3 

62 

135.7 

2.1 

63 

136 

2 

64 

136.4 

1.7 

65 

137 

1.3 

66 

137.5 

0.9 

67 

138.1 

0.4 

68 

138.8 

-0.2 

69 

139.6 

-0.8 

70 

140.4 

-1.5 

71 

141.2 

-2.2 

72 

142.2 

-3 

2 

-36.2 

2 

-34.1 

2 

-38.5 

2 

-36.1 

2 

-32.7 

2 

-45.9 

2 

-25.8 

2 

-30.2 

2 

-30 

3 

-36.2 

3 

-25 

3 

-24.2 

3 

-43.7 

3 

-20.8 

3 

-20.3 

3 

-23.6 

3 

-25.6 

4 

-39.7 

4 

-27 

4 

-15.2 

4 

-12.6 

4 

-16.7 

4 

-17.7 

5 

-8.8 

5 

-2.8 

5 

-1.7 

4 

-4.5 

4 

-2.2 

5 

3.3 

6 

5.8 

8 

6.9 

1 

8.6 

3 

10 

4 

10.6 

4 

11.7 

2 

14 

Expected  output  for  CLSBDW  f< 
clutter-to-nois 

Rec.  height  at  500  m 

ange 

<m) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

73 

143.2 

-3.9 

74 

144.2 

-4.8 

75 

145.2 

-5.7 

76 

146.4 

-6.8 

77 

147.6 

-7.9 

78 

148.7 

-8.9 

79 

149.8 

-9.9 

80 

151 

-11 

81 

152 

-11.8 

82 

153.2 

-13 

83 

153.8 

-13.4 

84 

154.7 

-14.2 

85 

155.4 

-14.8 

86 

156 

-15.3 

87 

156.7 

-15.9 

88 

156.8 

-15.9 

89 

156.9 

-15.9 

90 

157.2 

-16.1 

91 

157.3 

-16.1 

92 

158 

-16.7 

93 

157.7 

-16.4 

94 

158.4 

-17 

95 

157.8 

-16.2 

96 

158.8 

-17.1 

97 

159.6 

-17.9 

98 

159.4 

-17.5 

99 

160.3 

-18.4 

00 

160.3 

-18.3 

LOSS 

(dB) 

i-actor 

(dB) 

(dB) 

140.1 

-0.9 

16.8 

139.8 

-0.5 

19.3 

139.6 

-0.1 

21.8 

139.4 

0.2 

24.6 

139.2 

0.5 

27.7 

139.2 

0.6 

30.9 

139.3 

0.7 

39 

139.5 

0.5 

43.2 

139.9 

0.3 

46.1 

140.3 

-0.1 

49 

141 

-0.6 

51.8 

141.7 

-1.2 

54.4 

142.5 

-1.9 

56.6 

143.4 

-2.7 

58.2 

144.2 

-3.5 

59.4 

145 

-4.1 

60.2 

145.5 

-4.6 

60.6 

145.7 

-4.7 

60.3 

145.6 

-4.4 

59.7 

145.1 

-3.9 

58.5 

144.4 

-3 

56.7 

143.8 

-2.3 

55 

143.2 

-1.7 

52.6 

142.7 

-1 

50.9 

142.2 

-0.4 

48.7 

141.8 

0 

46.7 

141.5 

0.4 

44.3 

141.2 

0.8 

40.6 

for  CLSBDWL  fc 
clutter-to-noisi 


5i 


.tUgiliMciilili; 


48.9 

1.8 

-44.6 

150 

0.8 

8.1 

53.4 

-2.5 

14.6 

55.8 

-4.8 

-29.4 

52.6 

-1.4 

-31.9 

150 

1.2 

-267.8 

49.5 

1.9 

-317.4 

50.7 

0.8 

-297.7 

53.9 

-2.3 

-246.4 

57.6 

-5.9 

-88.4 

55.2 

-3.4 

-76.9 

51.9 

0 

-71.1 

50.3 

1.7 

-79.3 

50.1 

2 

-82.4 

51.3 

1 

-82.5 

53.9 

-1.6 

-87.2 

58.1 

-5.7 

-30.8 

59.8 

-7.3 

-328.1 

55.9 

-3.3 

-319.2 

52.9 

-0.2 

-66.9 

51.3 

1.5 

-114.6 

50.8 

2.1 

-22 

51.3 

1.7 

-93.4 

52.6 

0.5 

-21.5 

155 

-1.8 

-225.5 

58.9 

-5.6 

-389 

70.4 

-17 

-388 

60.4 

-7 

-391.4 

Table  43.  Expected  output  for  COSEC2 
for  rmax  receiver  range  of  50  km. 


Table  44.  Expected  output  for  EDUCT 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

134.4 

-8 

200 

124.1 

2.3 

300 

122.3 

4.1 

400 

129.7 

-3.3 

500 

126.5 

-0.1 

600 

123.5 

2.9 

700 

128 

-1.6 

800 

126.9 

-0.4 

900 

125.7 

0.7 

1000 

126.4 

0 

1100 

127 

-0.5 

1200 

127.8 

-1.4 

1300 

128.7 

-2.2 

1400 

129.4 

-3 

1500 

130.1 

-3.6 

1600 

130.7 

-4.3 

1700 

131.3 

-4.9 

1800 

131.8 

-5.4 

1900 

132.4 

-5.9 

2000 

132.8 

-6.4 

Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

10 

142.8 

3.6 

20 

147.5 

-1.1 

30 

150.1 

-3.6 

40 

152.5 

-6.1 

50 

156 

-9.6 

60 

158.6 

-12.2 

70 

154.1 

-7.7 

80 

149.5 

-3 

90 

146.3 

0.1 

100 

144.3 

2.2 

110 

143.1 

3.4 

120 

142.7 

3.7 

130 

143.2 

3.2 

140 

145.1 

1.3 

150 

149.4 

-3 

160 

162.2 

-15.8 

170 

151.8 

-5.4 

180 

145.2 

1.3 

190 

142.4 

4.1 

200 

141.5 

4.9 

47 


Table  45.  Expected  output  for  Table  46.  Expected  output  for  FLTA50 

EDUCTRF  for  rmax  receiver  range  of  100  for  rmax  receiver  range  of  50  km. 


km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

-3276.6 

-3276.6 

10 

155 

-2.5 

5 

-3276.6 

-3276.6 

20 

158.2 

-5.7 

10 

190.3 

-63.9 

30 

160 

-7.6 

15 

159 

-32.5 

40 

160.7 

-8.2 

20 

152.7 

-26.3 

50 

161 

-8.6 

25 

148.9 

-22.5 

60 

161.3 

-8.8 

30 

146.1 

-19.7 

70 

161.4 

-8.9 

35 

143.8 

-17.3 

80 

161.5 

-9 

40 

141.8 

-15.3 

90 

161.5 

-9.1 

45 

140 

-13.6 

100 

161.6 

-9.2 

50 

138.4 

-12 

110 

161.7 

-9.2 

55 

137 

-10.5 

120 

161.7 

-9.3 

60 

135.6 

-9.2 

130 

161.8 

-9.4 

65 

134.4 

-8 

140 

161.8 

-9.4 

70 

133.3 

-6.8 

150 

162 

-9.5 

75 

132.2 

-5.8 

160 

162.1 

-9.6 

80 

131.2 

-4.7 

170 

162.1 

-9.7 

85 

130.2 

-3.8 

180 

162.3 

-9.8 

90 

129.4 

-2.9 

190 

162.4 

-9.9 

95 

128.5 

-2.1 

200 

162.6 

-10.1 

100 

127.8 

-1.3 

48 


Table  47.  Expected  output  for  GASABS 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

10 

212.7 

-60.2 

20 

199.2 

-46.8 

30 

188.9 

-36.5 

40 

180.1 

-27.6 

50 

172.2 

-19.8 

60 

165.5 

-13 

70 

160.1 

-7.6 

80 

156.7 

-4.2 

90 

156.5 

-4 

100 

163.1 

-10.7 

110 

159.3 

-6.9 

120 

156 

-3.6 

130 

167.8 

-15.3 

140 

155.7 

-3.3 

150 

163 

-10.5 

160 

156.1 

-3.6 

170 

161.9 

-9.4 

180 

155.7 

-3.3 

190 

164.4 

-12 

200 

154.9 

-2.5 

Table  48.  Expected  output  for  GAUSS 
for  i' max  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.7 

-7.2 

200 

123.5 

2.9 

300 

121.7 

4.8 

400 

130.7 

-4.3 

500 

127.1 

-0.6 

600 

124 

2.4 

700 

133 

-6.6 

800 

132.2 

-5.7 

900 

129.6 

-3.2 

1000 

139 

-12.6 

1100 

140 

-13.5 

1200 

138.1 

-11.7 

1300 

148.3 

-21.9 

1400 

150.4 

-23.9 

1500 

149.5 

-23.1 

1600 

160.5 

-34.1 

1700 

163.6 

-37.1 

1800 

163.7 

-37.3 

1900 

175.5 

-49.1 

2000 

179.6 

-53.1 
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Table  49.  Expected  output  for  HEIGHT_RTG  for  receiver  height  of  500  m. 


Range 

(km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0.92 

-3276.7 

-3276.7 

1.84 

-3276.7 

-3276.7 

2.76 

-3276.7 

-3276.7 

3.68 

-3276.7 

-3276.7 

4.6 

89.6 

0.3 

5.52 

94.3 

-2.8 

6.44 

94.1 

-1.2 

7.36 

93.4 

0.6 

8.28 

92.2 

2.8 

9.21 

94.4 

1.5 

10.13 

94.5 

2.3 

11.05 

93.6 

4 

11.97 

99.8 

-1.5 

12.89 

96.5 

2.4 

13.81 

103.9 

-4.5 

14.73 

97.7 

2.4 

15.65 

97.4 

3.1 

16.57 

99.5 

1.6 

17.49 

105.1 

-3.6 

18.41 

100 

1.9 

50 


aDie  du.  txpectea  output  tor  nr  iu  i  tK  tor  receiver  neignts  or  u,  iuuu,  ana  ^uu 


Rang 

e 

(km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

Prop. 

Loss 

(dB) 

Prop. 

Factoi 

(dB) 

8.3 

65.5 

5.4 

66.9 

3.9 

70.8 

0 

16.6 

71.6 

5.3 

72.6 

4.3 

73 

3.9 

24.9 

75.2 

5.2 

76.2 

4.1 

76.1 

4.3 

33.2 

77.8 

5.1 

79.4 

3.5 

78.7 

4.1 

41.5 

80 

4.8 

82.2 

2.6 

80.8 

4.1 

49.8 

81.9 

4.5 

84.6 

1.8 

82.6 

3.8 

58.1 

83.6 

4.1 

86.8 

0.9 

84.3 

3.4 

66.4 

85.2 

3.7 

88.9 

0 

85.8 

3 

74.7 

86.7 

3.2 

90.8 

-0.9 

87.2 

2.7 

83 

110.9 

-20.1 

92.7 

-1.9 

88.4 

2.4 

91.3 

118.4 

-26.8 

93 

-1.3 

90.1 

1.6 

99.6 

122.8 

-30.4 

94.6 

-2.2 

89.9 

2.5 

107.9 

-3276.6 

-3276.6 

93.1 

0 

91.1 

2 

116.2 

-3276.6 

-3276.6 

94.6 

-0.9 

93.4 

0.4 

124.5 

-3276.6 

-3276.6 

96.8 

-2.5 

95.4 

-1.1 

132.8 

-3276.6 

-3276.6 

98.5 

-3.6 

93.6 

1.3 

141.1 

-3276.6 

-3276.6 

100.8 

-5.3 

93.8 

1.7 

149.4 

-3276.6 

-3276.6 

103.2 

-7.3 

94.8 

1.1 

157.7 

-3276.6 

-3276.6 

106.6 

-10.2 

96.8 

-0.4 

166 

-3276.6 

-3276.6 

106.2 

-9.3 

98.6 

-1.7 

174.3 

-3276.6 

-3276.6 

109.2 

-12 

100.8 

-3.5 

182.6 

-3276.6 

-3276.6 

111.1 

-13.5 

103.1 

-5.4 

190.9 

-3276.6 

-3276.6 

-3276.6 

-3276.6 

103 

-5 

199.2 

-3276.6 

-3276.6 

138.5 

-40 

104 

-5.6 

207.5 

-3276.6 

-3276.6 

131.3 

-32.5 

110.6 

-11.9 

215.8 

-3276.6 

-3276.6 

129.1 

-30 

115.9 

-16.7 

224.1 

-3276.6 

-3276.6 

128.2 

-28.7 

119.9 

-20.4 

232.4 

-3276.6 

-3276.6 

-3276.6 

-3276.6 

121.4 

-21.7 

240.7 

-3276.6 

-3276.6 

-3276.6 

-3276.6 

124 

-23.9 

249 

-3276.6 

-3276.6 

152.1 

-51.7 

125.8 

-25.4 

Table  51 .  Expected  output  for 
HF20QWVD  for  rmax  receiver  range  of 
100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

114.9 

-16.4 

50 

117 

-18.5 

100 

118.6 

-20.1 

150 

118.8 

-20.3 

200 

117.6 

-19.1 

250 

115.8 

-17.3 

300 

114.1 

-15.6 

350 

112.6 

-14.2 

400 

111.4 

-12.9 

450 

110.4 

-11.9 

500 

109.5 

-11 

550 

108.8 

-10.3 

600 

108.2 

-9.8 

650 

107.8 

-9.3 

700 

107.4 

-8.9 

750 

107.1 

-8.6 

800 

106.8 

-8.3 

850 

106.6 

-8.1 

900 

106.4 

-7.9 

950 

106.1 

-7.7 

1000 

105.9 

-7.4 

Table  52  Expected  output  for  HF20RF 
for  rmax  receiver  range  of  100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

119.8 

-21.3 

50 

122.6 

-24.1 

100 

123.5 

-25 

150 

121.7 

-23.3 

200 

119.3 

-20.8 

250 

117.1 

-18.7 

300 

115.4 

-16.9 

350 

113.9 

-15.5 

400 

112.7 

-14.3 

450 

111.7 

-13.2 

500 

110.9 

-12.4 

550 

110.2 

-11.7 

600 

109.6 

-11.1 

650 

109.1 

-10.6 

700 

108.7 

-10.2 

750 

108.4 

-9.9 

800 

108.1 

-9.7 

850 

107.9 

-9.5 

900 

107.8 

-9.3 

950 

107.6 

-9.1 

1000 

107.4 

-9 
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Table  53.  Expected  output  for  HF30  for 
rmax  receiver  range  of  100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

128.9 

-26.9 

50 

131.9 

-29.9 

100 

131.1 

-29.1 

150 

128.2 

-26.2 

200 

125.6 

-23.6 

250 

123.4 

-21.5 

300 

121.7 

-19.7 

350 

120.2 

-18.2 

400 

118.9 

-16.9 

450 

117.7 

-15.7 

500 

116.6 

-14.6 

550 

115.6 

-13.7 

600 

114.8 

-12.8 

650 

113.9 

-11.9 

700 

113.2 

-11.2 

750 

112.5 

-10.5 

800 

111.8 

-9.8 

850 

111.2 

-9.2 

900 

110.6 

-8.6 

950 

110.1 

-8.1 

1000 

109.6 

-7.6 

Table  54.  Expected  output  for  HIBW  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.6 

-7.2 

200 

123.3 

3.1 

300 

121.1 

5.3 

400 

129.7 

-3.3 

500 

124.9 

1.5 

600 

120.6 

5.8 

700 

128.1 

-1.7 

800 

125.3 

1.1 

900 

120.5 

5.9 

1000 

127.6 

-1.1 

1100 

125.6 

0.8 

1200 

120.5 

6 

1300 

127.5 

-1.1 

1400 

125.6 

0.8 

1500 

120.5 

6 

1600 

127.5 

-1 

1700 

125.6 

0.8 

1800 

120.5 

5.9 

1900 

127.4 

-1 

2000 

125.7 

0.8 
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Table  55.  Expected  output  for  HIEL  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

1000 

376.4 

-250 

2000 

376.4 

-250 

3000 

376.4 

-250 

4000 

376.4 

-250 

5000 

364.2 

-237.7 

6000 

258.9 

-132.4 

7000 

184.7 

-58.1 

8000 

140.8 

-14.2 

9000 

126.6 

0 

10000 

141.2 

-14.6 

11000 

183.7 

-57.1 

12000 

253.1 

-126.4 

13000 

348.2 

-221.5 

14000 

376.7 

-250 

15000 

376.8 

-250 

16000 

376.8 

-250 

17000 

376.9 

-250 

18000 

376.9 

-250 

19000 

377 

-250 

20000 

377.1 

-250 

Table  56.  Expected  output  for  HIFREQ 
for  rmax  receiver  range  of  50  km. 


Height 

(km) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

10 

205.4 

-52.9 

20 

192 

-39.5 

30 

181.6 

-29.2 

40 

172.8 

-20.3 

50 

164.9 

-12.5 

60 

158.2 

-5.7 

70 

152.8 

-0.3 

80 

149.4 

3 

90 

149.2 

3.3 

100 

155.9 

-3.4 

110 

152 

0.4 

120 

148.7 

3.7 

130 

160.5 

-8 

140 

148.4 

4 

150 

155.7 

-3.2 

160 

148.8 

3.7 

170 

154.6 

-2.1 

180 

148.4 

4 

190 

157.2 

-4.7 

200 

147.6 

4.8 
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Table  57.  Expected  output  for  HITRAN 
for  rmax  receiver  range  of  50  km. 


Height 

(m) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

50 

126.3 

0.1 

100 

121.8 

4.7 

150 

138.1 

-11.7 

200 

121.4 

5 

250 

134.6 

-8.2 

300 

122 

4.4 

350 

124.4 

2 

400 

127.7 

-1.3 

450 

120.9 

5.5 

500 

131.4 

-5 

550 

123.2 

3.3 

600 

121.5 

5 

650 

147.9 

-21.5 

700 

121.7 

4.7 

750 

122.3 

4.1 

800 

137.7 

-11.3 

850 

121.1 

5.3 

900 

123.2 

3.2 

950 

132.5 

-6.1 

1000 

120.8 

5.6 

Table  58.  Expected  output  for  HORZ  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.6 

-7.2 

200 

123.3 

3.1 

300 

121.1 

5.3 

400 

129.7 

-3.3 

500 

124.9 

1.5 

600 

120.6 

5.8 

700 

128.1 

-1.7 

800 

125.3 

1.1 

900 

120.5 

5.9 

1000 

127.6 

-1.1 

1100 

125.6 

0.9 

1200 

120.5 

6 

1300 

127.5 

-1 

1400 

125.6 

0.8 

1500 

120.5 

6 

1600 

127.4 

-1 

1700 

125.6 

0.8 

1800 

120.5 

6 

1900 

127.4 

-1 

2000 

125.6 

0.8 
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Table  59.  Expected  output  for  HTFIND 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.6 

-7.2 

200 

123.4 

3 

300 

121.5 

4.9 

400 

130 

-3.6 

500 

125.8 

0.7 

600 

122.1 

4.3 

700 

128.8 

-2.3 

800 

126.9 

-0.5 

900 

124.4 

2 

1000 

127.1 

-0.7 

1100 

126.5 

-0.1 

1200 

126.4 

0 

1300 

126.4 

0 

1400 

126.4 

0 

1500 

126.4 

0 

1600 

126.4 

0 

1700 

126.4 

0 

1800 

126.4 

0 

1900 

126.4 

0 

2000 

126.4 

0 

Table  60.  Expected  output  for  LOBW  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.8 

-7.4 

200 

124 

2.4 

300 

123.2 

3.2 

400 

132.9 

-6.4 

500 

133 

-6.6 

600 

134.1 

-7.7 

700 

146.4 

-19.9 

800 

151.8 

-25.3 

900 

156.6 

-30.2 

1000 

171.5 

-45.1 

1100 

181.5 

-55.1 

1200 

190.5 

-64 

1300 

208.4 

-81.9 

1400 

222.4 

-96 

1500 

235.6 

-109.2 

1600 

256.6 

-130.1 

1700 

274.6 

-148.2 

1800 

292 

-165.6 

1900 

316.2 

-189.7 

2000 

338.1 

-211.7 
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Table  61 .  Expected  output  for  LOEL  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

1000 

376.4 

-250 

2000 

376.4 

-250 

3000 

376.4 

-250 

4000 

376.4 

-250 

5000 

358.3 

-231.8 

6000 

254.6 

-128.2 

7000 

181.9 

-55.4 

8000 

139.6 

-13.1 

9000 

126.9 

-0.3 

10000 

142.9 

-16.3 

11000 

186.8 

-60.2 

12000 

257.6 

-130.9 

13000 

354 

-227.3 

14000 

376.7 

-250 

15000 

376.8 

-250 

16000 

376.8 

-250 

17000 

376.9 

-250 

18000 

376.9 

-250 

19000 

377 

-250 

20000 

377.1 

-250 

Table  62.  Expected  output  for  LOFREQ 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

250 

116.7 

-10.3 

500 

109 

-2.6 

750 

105 

1.4 

1000 

102.6 

3.8 

1250 

101.2 

5.2 

1500 

100.5 

5.9 

1750 

100.5 

5.9 

2000 

101 

5.4 

2250 

102.3 

4.1 

2500 

104.5 

1.9 

2750 

108.4 

-1.9 

3000 

116.9 

-10.5 

3250 

119.4 

-13 

3500 

109.2 

-2.7 

3750 

104.9 

1.5 

4000 

102.6 

3.9 

4250 

101.2 

5.2 

4500 

100.6 

5.9 

4750 

100.5 

6 

5000 

101 

5.5 
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Table  63.  Expected  output  for  LOTRAN  for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

500 

133.8 

-7.3 

1000 

126.3 

0.2 

1500 

122.9 

3.5 

2000 

121.2 

5.3 

2500 

120.5 

6 

3000 

120.7 

5.8 

3500 

121.8 

4.6 

4000 

124.1 

2.3 

4500 

128.5 

-2 

5000 

140.4 

-14 

5500 

134.2 

-7.7 

6000 

126.7 

-0.2 

6500 

123.2 

3.3 

7000 

121.4 

5.1 

7500 

120.7 

5.8 

8000 

120.8 

5.8 

8500 

121.7 

4.9 

9000 

123.6 

3 

9500 

127.1 

-0.6 

10000 

134.8 

-8.2 
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Expected  output  for  PERW  for  receiver  heights  of  0  £ 
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Table  66.  Expected  output  for  PVT  for 
rmax  receiver  range  of  10  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

-3276.6 

-3276.6 

100 

-3276.6 

-3276.6 

200 

-3276.6 

-3276.6 

300 

101.3 

5.1 

400 

113.6 

-7.1 

500 

103.9 

2.6 

600 

105.2 

1.2 

700 

109.5 

-3 

800 

104.1 

2.3 

900 

107 

-0.5 

1000 

107.7 

-1.3 

1100 

106.2 

0.3 

1200 

105.8 

0.7 

1300 

102.9 

3.6 

1400 

108.5 

-2.1 

1500 

104.1 

2.3 

1600 

107.5 

-1.1 

1700 

103.3 

3.1 

1800 

104.7 

1.7 

1900 

111 

-4.6 

2000 

104 

2.4 

Table  67.  Expected  output  for 
RDLONGB  for  rmax  receiver  range  of 
100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

50 

138.7 

-22.8 

100 

133.1 

-17.1 

150 

129.3 

-13.3 

200 

126.4 

-10.5 

250 

126.8 

-10.8 

300 

129.5 

-13.5 

350 

125 

-9.1 

400 

121.7 

-5.7 

450 

119.1 

-3.2 

500 

118.5 

-2.5 

550 

118.5 

-2.5 

600 

117.1 

-1.1 

650 

114.6 

1.4 

700 

112.6 

3.4 

750 

113.6 

2.4 

800 

112.6 

3.4 

850 

111 

5 

900 

110.9 

5.1 

950 

110.9 

5.1 

1000 

110.1 

5.8 
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Table  68.  Expected  output  for  RNGDEP 
for  rmax  receiver  range  of  250  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

199.8 

-49.9 

200 

195.8 

-45.9 

300 

202.8 

-52.8 

400 

178.6 

-28.7 

500 

141.9 

8 

600 

135.4 

14.5 

700 

150.9 

-0.9 

800 

164.2 

-14.2 

900 

166.8 

-16.9 

1000 

182.9 

-33 

1100 

196.7 

-46.8 

1200 

197.4 

-47.4 

1300 

200.7 

-50.8 

1400 

195.1 

-45.2 

1500 

192.9 

-43 

1600 

191.5 

-41.5 

1700 

192.4 

-42.4 

1800 

195.5 

-45.5 

1900 

194.5 

-44.6 

2000 

193.3 

-43.3 

Table  69.  Expected  output  for  SBDUCT 
for  rmax  receiver  range  of  200  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

250 

139.9 

8.1 

500 

166 

-18 

750 

157 

-9 

1000 

161.3 

-13.3 

1250 

174.6 

-26.6 

1500 

169.5 

-21.4 

1750 

158.6 

-10.6 

2000 

150.8 

-2.8 

2250 

146.9 

1.1 

2500 

147.7 

0.3 

2750 

165.7 

-17.7 

3000 

145.1 

3 

3250 

148 

0 

3500 

147 

1 

3750 

145.3 

2.7 

4000 

149.7 

-1.7 

4250 

144.4 

3.7 

4500 

149.9 

-1.9 

4750 

144.5 

3.5 

5000 

148 

0 
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Table  70.  Expected  output  for 
SBDUCTRF  for  rmax  receiver  range  of 
200  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

182.2 

-34.2 

50 

141.7 

6.3 

100 

136.5 

11.5 

150 

141.5 

6.5 

200 

141.5 

6.5 

250 

141 

7 

300 

152.5 

-4.4 

350 

171.6 

-23.6 

400 

182.7 

-34.7 

450 

173 

-25 

500 

169.4 

-21.4 

550 

165.7 

-17.7 

600 

163.3 

-15.3 

650 

160.9 

-12.9 

700 

159.9 

-11.9 

750 

159.2 

-11.1 

800 

159.2 

-11.2 

850 

159.4 

-11.4 

900 

160.1 

-12 

950 

161.2 

-13.1 

1000 

162.5 

-14.5 

Table  71 .  Expected  output  for  SINEX  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

133.7 

-7.2 

200 

123.5 

3 

300 

121.6 

4.8 

400 

130.7 

-4.3 

500 

127 

-0.6 

600 

124.1 

2.4 

700 

133.3 

-6.8 

800 

133 

-6.6 

900 

131.9 

-5.4 

1000 

143.2 

-16.8 

1100 

151.3 

-24.8 

1200 

150.9 

-24.5 

1300 

157.9 

-31.5 

1400 

156.1 

-29.6 

1500 

150.9 

-24.5 

1600 

157.9 

-31.5 

1700 

156.1 

-29.7 

1800 

150.9 

-24.5 

1900 

157.9 

-31.5 

2000 

156.1 

-29.7 
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Table  72.  Expected  output  for  TROPOS  for 
rmax  receiver  range  of  200  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

165.2 

-46.7 

200 

164.6 

-46.1 

300 

164.5 

-46 

400 

164.4 

-46 

500 

164.4 

-46 

600 

164.2 

-45.7 

700 

163.4 

-45 

800 

162.1 

-43.6 

900 

160.2 

-41.8 

1000 

158 

-39.6 

1100 

155.7 

-37.2 

1200 

153.4 

-34.9 

1300 

151.2 

-32.7 

1400 

149 

-30.5 

1500 

146.9 

-28.4 

1600 

144.9 

-26.5 

1700 

143.1 

-24.6 

1800 

141.3 

-22.8 

1900 

139.6 

-21.1 

2000 

138 

-19.6 

Table  73.  Expected  output  for  TROPOT 
for  rmax  receiver  range  of  200  km.. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

100 

164.8 

-46.3 

200 

163.8 

-45.3 

300 

162.8 

-44.3 

400 

161.2 

-42.7 

500 

159.2 

-40.7 

600 

157 

-38.6 

700 

155.1 

-36.6 

800 

153.5 

-35.1 

900 

152.4 

-33.9 

1000 

151.6 

-33.2 

1100 

151.2 

-32.7 

1200 

150.6 

-32.2 

1300 

149.6 

-31.1 

1400 

147.9 

-29.4 

1500 

145.9 

-27.4 

1600 

143.9 

-25.4 

1700 

142.1 

-23.7 

1800 

140.6 

-22.2 

1900 

139.1 

-20.6 

2000 

137.4 

-18.9 

64 


Table  74.  Expected  output  for  Table  75.  Expected  output  for  USERHF 

USERDEFA  for  rmax  receiver  range  of  for  rmax  receiver  range  of  50  km. 


300  km. 


Prop. 

Prop. 

Prop. 

Prop. 

Height 

Loss 

Factor 

Height 

Loss 

Factor 

(meters) 

(dB) 

(dB) 

(meters) 

(dB) 

(dB) 

100 

133.6 

-7.2 

150 

137.7 

3.3 

200 

123.8 

2.6 

300 

138.8 

2.3 

300 

122.6 

3.8 

450 

159 

-17.9 

400 

128.9 

-2.5 

600 

153.2 

-12.2 

500 

126.7 

-0.3 

750 

151.3 

-10.2 

600 

126 

0.4 

900 

152.6 

-11.5 

700 

126.4 

0 

1050 

154.8 

-13.8 

800 

126.4 

0 

1200 

158.9 

-17.9 

900 

126.4 

0 

1350 

168.6 

-27.5 

1000 

126.4 

0 

1500 

165 

-24 

1100 

127.3 

-0.9 

1650 

156.5 

-15.4 

1200 

127.3 

-0.9 

1800 

153.6 

-12.5 

1300 

127.3 

-0.9 

1950 

153 

-11.9 

1400 

127.3 

-0.9 

2100 

152.2 

-11.1 

1500 

128.4 

-1.9 

2250 

151 

-10 

1600 

128.4 

-1.9 

2400 

151 

-10 

1700 

128.4 

-1.9 

2550 

151.8 

-10.7 

1800 

128.4 

-1.9 

2700 

152.5 

-11.4 

1900 

128.4 

-1.9 

2850 

153.7 

-12.6 

2000 

129.5 

-3.1 

3000 

155.3 

-14.2 
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Table  76.  Expected  output  for  VERT  for 
rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

186.9 

-60.5 

100 

133.8 

-7.3 

200 

123.5 

2.9 

300 

121.4 

5.1 

400 

129.3 

-2.9 

500 

125.9 

0.5 

600 

121.3 

5.1 

700 

127.8 

-1.4 

800 

127 

-0.6 

900 

121.7 

4.8 

1000 

127.2 

-0.8 

1100 

127.9 

-1.5 

1200 

122.1 

4.4 

1300 

126.9 

-0.5 

1400 

128.5 

-2 

1500 

122.5 

4 

1600 

126.7 

-0.3 

1700 

128.8 

-2.4 

1800 

122.8 

3.6 

1900 

126.5 

-0.1 

2000 

129.1 

-2.7 

Table  77.  Expected  output  for  VERTMIX 
for  rmax  receiver  range  of  50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

150.7 

-44.3 

50 

141.8 

-35.4 

100 

134.7 

-28.3 

150 

130.4 

-24 

200 

127.2 

-20.8 

250 

124.6 

-18.2 

300 

122.4 

-16 

350 

120.5 

-14.1 

400 

118.9 

-12.5 

450 

117.6 

-11.1 

500 

116.4 

-10 

550 

115.4 

-9 

600 

114.5 

-8.1 

650 

113.7 

-7.3 

700 

113.3 

-6.9 

750 

112.6 

-6.2 

800 

112 

-5.6 

850 

111.4 

-5 

900 

110.8 

-4.4 

950 

110.3 

-3.9 

1000 

109.8 

-3.4 
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Table  78.  Expected  output  for 
VERTSEA  for  rmax  receiver  range  of 
300  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

145.6 

-23.6 

50 

136.4 

-14.4 

100 

129.9 

-7.9 

150 

127.1 

-5.1 

200 

126.7 

-4.7 

250 

129.2 

-7.2 

300 

135.9 

-13.9 

350 

143.8 

-21.8 

400 

147.6 

-25.7 

450 

146.3 

-24.3 

500 

144.9 

-22.9 

550 

144.2 

-22.3 

600 

144 

-22 

650 

144 

-22 

700 

144.2 

-22.2 

750 

144.6 

-22.6 

800 

145 

-23 

850 

145.5 

-23.5 

900 

145.9 

-23.9 

950 

146.3 

-24.3 

1000 

146.6 

-24.6 

Table  79.  Expected  output  for 
VERTUSRD  for  rmax  receiver  range  of 
50  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

0 

174.6 

-68.2 

50 

140.5 

-34.1 

100 

134 

-27.5 

150 

129.8 

-23.4 

200 

126.8 

-20.3 

250 

124.3 

-17.9 

300 

122.2 

-15.8 

350 

120.5 

-14.1 

400 

119 

-12.5 

450 

117.7 

-11.2 

500 

116.5 

-10.1 

550 

115.4 

-9 

600 

114.5 

-8.1 

650 

113.7 

-7.2 

700 

113.3 

-6.9 

750 

112.6 

-6.2 

800 

112 

-5.6 

850 

111.4 

-5 

900 

110.8 

-4.4 

950 

110.3 

-3.9 

1000 

109.8 

-3.4 
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Table  80.  Expected  output  for  WEDGE  for  rmax  receiver  range  of  100  km. 


Height 

(meters) 

Prop. 

Loss 

(dB) 

Prop. 

Factor 

(dB) 

50 

154.5 

-22 

100 

154.7 

-22.3 

150 

155.7 

-23.3 

200 

155.5 

-23 

250 

154 

-21.6 

300 

152.1 

-19.7 

350 

150.3 

-17.9 

400 

149 

-16.6 

450 

148.1 

-15.6 

500 

146.8 

-14.4 

550 

144 

-11.5 

600 

139.7 

-7.3 

650 

135.4 

-2.9 

700 

131.6 

0.9 

750 

128.3 

4.1 

800 

126.3 

6.2 

850 

126.9 

5.6 

900 

127.8 

4.6 

950 

127.4 

5 

1000 

130.2 

2.2 

50 

154.5 

-22 
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4.5  CRITERIA  FOR  EVALUATING  RESULTS 


The  calculated  propagation  loss  in  dB  should  match  the  numerical  values  in  each 
table  at  each  of  the  levels  shown  to  within  0.1  dB  (1  cB).  APM  rounds  its  output  loss 
values  to  the  nearest  1  cB,  and  hence  it  is  possible  for  differences  of  1  cB  to  exist 
between  different  implementations  of  APM.  It  is  expected,  however,  that  in  most  cases 
the  values  will  match  those  inTable  33  through  Table  80  exactly. 

4.6  TEST  PROCEDURE 

1 .  Compile  for  execution,  the  APM  CSCI,  the  driver  program  APMMAIN.F90,  and  the 
module  APM  MOD.F90. 

2.  An  input  data  file  has  been  provided,  as  a  text  file,  for  each  test  case. 

3.  The  APM  CSCI  is  executed  in  a  form  that  reads  the  input  data  file,  performs  the 
calculations,  and  writes  the  output  to  a  text  file. 

4.  The  output  file  is  compared  to  the  final  expected  test  results  to  determine  satisfactory 
performance. 

4.7  ASSUMPTIONS  AND  CONSTRAINTS 

Input  data  elements  are  assumed  to  be  constrained  by  the  limits  listed  within 
Tables  1  through  4  of  the  Software  Requirements  Specification  (Ref.  3). 

5.  REQUIREMENTS  TRACEABILITY 

The  provided  driver  program  that  accesses  the  APM  CSCI  will  create  an  output 
file  for  each  test  case.  The  output  file  will  have  the  same  prefix  name  as  the  input  file. 
The  extension  is  “.OUT”.  This  output  file  contains  height  in  meters  and  corresponding 
propagation  loss  in  dB  that  should  correspond  to  the  entries  in  Table  33  through  Table  80 
for  each  test  case. 

The  provided  program  APMMAIN.FOR,  when  compiled  with  the  APM  CSCI, 
will  read  the  provided  input  files  containing  all  necessary  infonnation  for  each  test  case. 
Each  input  file  is  named  for  each  test  case,  with  a  “.IN”  extension. 

6.  NOTES 

Table  81  is  a  glossary  of  acronyms  and  abbreviations  used  within  this  document. 
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Table  81 .  Acronyms  and  Abbreviations. 


Term 

Definition 

Surface  absolute  humidity  (g/m3) 

ClTltgain 

Antenna  gain  (dBi) 

an  tfoj 

Antenna  height 

APM 

Advanced  Propagation  Model 

cB 

centibel 

Clut 

Logical  flag  used  to  indicate  if  surface  clutter  calculations  are  desired 

CSC 

Computer  Software  Component 

CSCI 

Computer  Software  Configuration  Item 

dB 

Decibel 

dielec 

2-dimensional  array  of  relative  permittivity  and  conductivity 

EM 

Electromagnetic 

FORTRAN 

Formula  Translation 

fMH: 

EM  system  frequency  (MFlz) 

Ya 

Surface  specific  attenuation  rate  (dB/km) 

Yc 

Array  of  “backscattering  effectiveness”  term  used  in  reflectivity  computation  (dB) 

yrng 

Array  of  corresponding  ranges  for  yc  (km) 

hfang 

User-defined  height-finder  power  reduction  angle  array  (deg) 

hffac 

User-defined  power  reduction  factor  array 

Ihnux 

Maximum  height  output  for  a  particularapplication  of  APM. 

ll  min 

Minimum  height  output  for  a  particular  application  of  APM. 

hmsl 

Refractivity  profile  height  array 

l  extra 

Extrapolation  flag  for  refractivity  profiles  entered  below  mean  sea  level 

lgc 

Number  of  yc  values  and  corresponding  ranges 

lgr 

Number  of  ground  composition  types  for  particular  application  of  APM 

igrnd 

Ground  composition  type  array 

Ipat 

Antenna  pattern 

Ipol 

Antenna  polarization 

lang 

Logical  flag  indicating  if  propagation  angle  and  propagation  factor  output  for  specific  ray 
paths  is  desired 

lerr6 

Controlling  logical  flag  for  error  6 

lerrl2 

Controlling  logical  flag  for  error  12 
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Table  81 .  Acronyms  and  Abbreviations.  (Continued) 


Term 

Definition 

Lgys 

System  loss  (dB) 

Ivlp 

Number  of  levels  in  refractivity  profiles  for  particular  application  of  APM 

km 

kilometers 

m 

meters 

N/A 

Not  applicable 

Nf 

Noise  figure  (dB) 

Mfacs 

Number  of  power  reduction  factors  and  cut-back  angles  for  user-defined  height  finder 
radar 

ft  prof 

Number  of  refractivity  profiles  for  particular  application  of  APM 

ftrout 

Number  of  range  output  points  for  a  particular  application  of  APM. 

ftw 

Number  of  wind  speeds 

ftzout 

Number  of  height  output  points  for  a  particular  application  of  APM. 

ftzoutrtg 

Number  of  height  output  points  relative  to  ground  for  a  particular  application  of  APM. 

PEflag 

Logical  flag  indicating  PE-only  mode 

P, 

Transmitter  power  (kW) 

refmsl 

Refractivity  profile  M-unit  array 

rgrnd 

Gound  composition  type  range  array 

ft max 

Maximum  range  output  for  a  particular  application  of  APM. 

ftmult 

PE  range  step  multiplier 

rngprof 

Refractivity  profile  range  array 

rngwind 

Range  array  of  wind  speeds 

fair 

Surface  air  temperature  (°C) 

r 

Pulse  width/length  (microseconds) 

terx 

Terrain  profile  range  array 

tery 

Terrain  profile  height  array 

@hbw 

Antenna  horizontal  beam  width  (degrees) 

th 

''’•'max 

Visible  portion  of  maximum  PE  propagation  angle 

T 

J  ropo 

Logical  flag  to  include  troposcatter  calculations 

Mbw 

Antenna  vertical  beam  width  (degrees) 

Mo 

antenna  elevation  angle  (degrees) 

wind 

Wind  speed  array  (m/s) 

winder 

Wind  direction  relative  to  boresight  (degrees) 

zoutrtg 

Array  of  receiver  heights  relative  to  local  surface  elevation  (m) 
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7.  SAMPLE  PROGRAM  LISTING 


The  sample  driver  program  APMMAIN.F90,  which  exercises  the  APM  CSCI,  is 
provided  below. 

i  **************  APMMAIN  DRIVER  PROGRAM  FOR  APM  Ver  2.1.04  *************** 

!  This  is  a  sample  driver  program  for  APM  routines  APMINIT,  APMSTEP, 

!  RET_GRAZE,  XOINIT,  and  XOSTEP.  All  numeric  parameters  passed  to 
!  APMINIT  and  APMSTEP  must  be  in  metric  units.  All  input  arrays  are 
!  dynamically  allocated  and  are  dimensioned  with  variable  sizes. 

!  This  program  reads  an  input  (normally  designated  as  a  ".IN"  file) 

!  and  generates  a  ".OUT"  file.  Depending  on  the  input  parameters, 

!  there  will  be  additional  output  files  generated: 

!  1)  If  the  propagation  loss  relative  to  the  ground  height  is  desired 
!  and  the  appropriate  input  parameters  have  been  specified,  then  a 
!  file  ".RTG"  will  be  generated. 

!  2)  If  clutter-to-noise  is  desired  and  the  appropriate  parameters  have 
!  been  specified,  then  a  file  ".CNR"  will  be  generated. 

!  3)  If  propagation  angles  and  factors  for  direct/ref lected  rays  are 
!  desired,  then  a  file  ".AF"  will  be  generated. 

program  apmmain 

implicit  integer ( kind=4 )  (i-n) 

implicit  real ( kind=8 )  (a-h,  o-z) 

character  filein*50,  fileall*50,  answer*l 

external  apmstatus 

data  inf,  iall  /  14,  16  / 

10  continue 

write (*, ' (a\) ') '  Name  of  input  file?  ' 
read(*,  ' (a) '  )  filein 

!  If  the  filename  has  a  ".IN"  extension  then  this  is  a  one-time 
!  APM  run . 

ichk  =  index (  filein,  ' .in'  ) 
if  (  ichk  . gt.  0  )  then 

(This  just  opens,  reads,  and  runs  one  APM  case  at  a  time, 
call  runapm (  inf,  filein  ) 

else 

!  This  assumes  all  input  filenames  (*.IN)  are  contained  in  a  text  file 
!  withOUT  extension  .IN.  This  runs  all  input  files  (filenames 
!  contained  in  FILEALL)  in  one  'batch'  run. 

fileall  =  filein 

open (  iall,  file  =  fileall  ) 

do  while (  .not.  eof (  iall  )  ) 

read  (  iall,  '  (a)  ',  err=20,  end=20  )  filein 
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call  runapm (  inf,  filein  ) 

end  do 


20  continue 


end  if 

write (*, ' (a\) ') '  Input  another  file?  (y  or  n) ' 
read(*,  ' (a) 1  )  answer 

if  (  (  answer  .eq.  'y'  )  .or.  (  answer  .eq.  'Y'))  goto  10 
end 

i***************************  SUBROUTINE  RUNAPM  ****************************** 
subroutine  runapm (  inf,  filein  ) 
use  apirwnod 

implicit  integer ( kind=4 )  (i-n) 

implicit  real ( kind=8 )  (a-h,  o-z) 

!MPFL  must  be  declared  an  INTEGER*2  allocatable  array. 

! ITLOSS  is  a  dummy  array  and  will  be  used  to  store  entire  loss  grid. 

! ITPFAC  is  a  dummy  array  and  will  be  used  to  store  entire  propagation  factor 
grid. 

!NOTE:  Propagation  factor  is  output  as  20*LOG10 (F) . 

integer (kind=2) ,  allocatable  : :  mpfl itloss  itpfac 

mpf l_rtg ( : , : ) 

real (  kind=8  ),  allocatable  ::  angfac  ,  cnr_dB ( : ) ,  graze_at_rout ( : ) , 

propaf ( : , : ) 

logical (  kind  =  4  )  lgraze 
character  filein* (*) 
external  apmstatus 

data  ioutf,  ioutrtg,  ioutcnr,  ioutaf  /  15,  40,  41,  42  / 
open (  inf,  file=filein  ) 

lmsl  =  .true.  ! For  now  hard-wire  this  parameter  to  "True" 

i ****************************** ***READ  CALC  INF0* ******************  *********** 


read (  inf,  *  )  lerr6 
read (  inf,  *  )  lerrl2 


read (  inf,  *  )  peflag 
read (  inf,  *  )  thmax 


read (  inf,  *  )  rmult 
read (  inf,  *  )  tropo 
.  true . =troposcatter 


! Perform  field  calcs  using  PE  model  only? 

[Maximum  PE  calculation  angle  in  degrees  (used  only  if 
!  PEFLAG  =  .true. 

! PE  range  step  multiplier  (used  only  if  PEFLAG  =  .true.) 
! Troposcatter  flag:  . false. =no  troposcatter , 


Clutter  flag:  Logical  variable 

If  .True.  =  perform  clutter  calculations 
If  .False.  =  no  clutter  calculations  are  performed 


read (  inf,  *  )  clut 


Propagation  angle/factor  flag:  Logical  variable 

If  .True.  =  compute  propagation  angles  and  factors  for  direct  and 

reflected  rays  (where  applicable) .  These  values  will  be 
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!  passed  back  through  array  PROPAF  in  calls  to  APMSTEP 

!  and  XOSTEP. 

!  If  .False.  =  no  extra  computations 

read (  inf,  *  )  lang 

!  ****************************** ***READ  system  info****************************** 


read (  inf,  *  )  freq 

read (  inf,  *  )  antht 

read (  inf,  *  )  ipat 

read (  inf,  *  )  ipol 


! Frequency  in  MHz. 

! antenna  height. 

! antenna  type 
!  antenna  polarization 


!This  value  is  ignored  for  Omni  antenna,  otherwise,  the  value  must  be 
! entered  in  degrees. 


read (  inf,  *  )  bwidth 


!This  value  is  ignored  for  Omni  antenna,  otherwise,  the  value  must  be 
! entered  in  degrees. 


read (  inf,  *  )  elev 


1 1 f  using  specific  height-finder  antenna,  this  variable  contains  a  non-zero 
lvalue  corresponding  to  the  #  of  cut-back  angles  and  cut-back  factors. 

read (  inf,  *  )  nfacs 

!  If  using  specific  height-finder  antenna,  then  must  specify  values  for  HFANGO 
and 

!  HFFAC  arrays.  Height-finder  cut-back  angles  HFANGO  must  be  in  degrees, 
if  (  nfacs  . gt .  0  )  then 

IF (  ALLOCATED (  hfang  )  )  DEALLOCATE (  hfang,  stat=ierror  ) 

ALLOCATE (  hf ang ( nfacs ) ,  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  HFANG  ALLOCATION***********' 

stop 
end  if 

hfang  =  0. 

IF (  ALLOCATED (  hffac  )  )  DEALLOCATE (  hffac,  stat=ierror  ) 

ALLOCATE (  hf fac ( nfacs ) ,  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  HFFAC  ALLOCATION***********' 

stop 
end  if 

hffac  =  0. 


do  i  =  1 ,  nfacs 

read)  inf,  *  )  hfang(i),  hffac(i) 

end  do 
end  if 


! If  performing  clutter  calculations  then  the  following  parameters  MUST 
Ibe  specified 


read (  inf, 
read (  inf, 
read (  inf, 
read (  inf, 
read (  inf, 
read (  inf. 


*  )  antgain 

*  )  horbw 

*  )  puls_len 

*  )  tx_pow 

*  )  sysloss 

*  )  qnoisef 


lAntenna  gain  in  dBi 
I  Horizontal  beamwidth  in  deg 
I  Pulse  length  in  microseconds 
I  Transmitter  power  in  kW 
! System  losses  in  dB 
INoise  figure  in  dB 


i************************** *RRAD  GENERIC  INPUT  info***************************** 


74 


read (  inf,  *  )  hmin 

read (  inf,  *  )  hmax 

read (  inf,  *  )  rkm 

max  =  rkm  *  1 .  d3 

read (  inf,  *  )  nzout 
read (  inf,  *  )  nrout 


! Minimum  height  in  m 
! Maximum  output  height  in  m 
! Maximum  output  range  in  km 
[Convert  to  m  and  initialize  RMAX  for  input  to  APM. 
[Number  of  output  height  points. 

[Number  of  output  range  points. 


[Allocate  and  initialize  array  for  loss  computation  relative  to  ground. 


read (  inf,  *  )  nzout_rtg  [Number  of  output  height  points  relative  to 

ground. 

if (  nzout_rtg  . gt .  0  )  then 

if (  allocated (  zout_rtg  )  )  deallocate (  zout_rtg,  stat=ierror  ) 

allocate (  zout_rtg (nzout_rtg) ,  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*) '****** **ERROR  IN  ZOUT_RTG  ALLOCATION********' 

stop 
end  if 

zout_rtg  =  0 . 


[Now  read  all  receiver  heights  in  meters  relative  to  ground. 


do  i  =  1 ,  nzout_rtg 

read(  inf,  *  )  zout_rtg(i) 

end  do 
end  if 


[Allocate  MPFL_RTG ( )  -  will  occur  regardless  of  value  of  NZOUT_RTG. 

if (  allocated (  mpfl_rtg  )  )  deallocate (  mpfl_rtg,  stat=ierror  ) 

allocate (  mpf l_rtg ( 2 , nzout_rtg) ,  stat=ierror  ) 
if  (  ierror  .ne.  0  )  stop 
mpfl  rtg  =  -32767 

i ****************************READ  METEOROLOGICAL 
INFO***************************** 


read(  inf. 


)  iextra 


read(  inf, 
read)  inf, 
read)  inf. 


abshum 

fair 

gammaa 


[Extrapolation  flag: 

! O=extrapolate  using  standard  gradient, 

! l=extrapolate  using  gradient  from  first  2  levels. 
[Surface  absolute  humidity  in  g/m**3 
[Surface  air  temperature  in  degrees  C 
[Gaseous  absorption  attenuation  rate  in  dB/km 


read(  inf,  *  )  nw 


[Number  of  wind  speeds  specified. 


if  (  nw  . gt .  0  )  then 


[If  wind  speeds  specified,  allocate  memory. 


IF (  ALLOCATED (  RNGWIND  )  )  DEALLOCATE (  RNGWIND  ) 

ALLOCATE (  RNGWIND (NW)  ) 

RNGWIND  =  0. 

IF (  ALLOCATED (  WIND  )  )  DEALLOCATE (  WIND  ) 

ALLOCATE (  WIND (NW)  ) 

WIND  =  0. 


[Read  wind  speeds  and  ranges, 
do  i  =  1 ,  nw 

read (  inf,  *  )  wind(i),  rngwind(i)  [Wind  speed  in  m/s  and  range  in  km  at 
end  do  [which  to  apply  specified  wind  speed, 

rngwind  =  1 . d3  *  rngwind  [Convert  RNGWIND  from  km  to  m. 

end  if 
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read (  inf,  *  )  nprof  ! Number  of  refractivity  profiles 

read (  inf,  *  )  lvlp  ! Number  of  levels  in  refractivity  profiles. 

!  Allocate  and  initialize  height/refractivity  and  range  arrays. 

IF (  ALLOCATED (  HMSL  )  )  DEALLOCATE (  HMSL,  stat=ierror  ) 

ALLOCATE (  HMSL (0: LVLP,  NPROF),  stat=ierror  ) 
if  (  ierror  ,ne.  0  )  then 

write (*,*)  '********* *ERROR  IN  HMSL  ALLOCATION***********' 

stop 
end  if 

HMSL  =  0. 

IF (  ALLOCATED (  REFMSL  )  )  DEALLOCATE (  REFMSL,  stat=ierror  ) 

ALLOCATE (  REFMSL ( 0 : LVLP,  NPROF),  stat=ierror  ) 
if  (  ierror  ,ne.  0  )  then 

write (*,*) '******* ***ERROR  IN  REFMSL  ALLOCATION***********' 

stop 
end  if 

REFMSL  =  0. 

IF (  ALLOCATED (  RNGPROF  )  )  DEALLOCATE (  RNGPROF,  stat=ierror  ) 

ALLOCATE (  RNGPROF (NPROF ) ,  stat=ierror  ) 
if  (  ierror  ,ne.  0  )  then 

write (*,*) '******* ***ERROR  IN  RNGPROF  ALLOCATION***********' 

stop 
end  if 

RNGPROF  =  0. 

do  i  =  1,  nprof 

read (  inf,  *  )  rngp 
rngprof(i)  =  rngp  *  1 . d3 
do  j  =0,  lvlp-1 

read (  inf,  *  )  hmsl(j,i), 
end  do 
end  do 

read (  inf,  *  )  wind_dir  (Used  in  clutter  calculations. 

i  **************************** ****READ  TERRAIN  info****************************** 
read (  inf,  *  )  igr  (Number  of  ground  composition  types 

if  (  igr  . gt .  0  )  then 

IF (  ALLOCATED (  DIELEC  )  )  DEALLOCATE (  DIELEC,  stat=ierror  ) 

ALLOCATE (  DIELEC(2,  IGR),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  DIELEC  ALLOCATION***********' 

stop 
end  if 

DIELEC  =  0. 

IF (  ALLOCATED (  IGRND  )  )  DEALLOCATE (  IGRND,  stat=ierror  ) 

ALLOCATE (  IGRND (IGR),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  IGRND  ALLOCATION***********' 

stop 
end  if 

IGRND  =  0. 

IF (  ALLOCATED (  RGRND  )  )  DEALLOCATE (  RGRND,  stat=ierror  ) 

ALLOCATE (  RGRND (IGR),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 


(Range  of  profile  in  km 
(Convert  profile  range  from  km  to  m 

refmsl(j,i)  (Height/refractivity  levels 


76 


write (*,*)' **********ERROR  IN  RGRND  ALLOCATION***********' 

stop 
end  if 

RGRND  =  0. 

!  Read  ranges  at  which  ground  types  apply,  ground  composition  types,  and 
dielectric 

!  constants.  If  IGRND(i)  =  7,  then  must  specify  non-zero  values  for  DIELEC  (), 
otherwise 

!  set  to  0.  Ranges  of  ground  types  are  read  in  km. 
do  i  =  1 ,  igr 

read (  inf,  *  )  rground,  igrnd(i),  (dielec (j , i ), j =1 , 2 ) 
rgrnd(i)  =  rground  *  1 . d3 

end  do 

end  if 

read (  inf,  *  )  igc  (Number  of  GAMMAC  and  GAMRNG  pairs  -  used  for  clutter 
calcs . 

if  (  igc  . gt .  0  )  then 

IF (  ALLOCATED (  GAMMAC  )  )  DEALLOCATE (  GAMMAC,  stat=ierror  ) 

ALLOCATE (  GAMMAC (IGC),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  GAMMAC  ALLOCATION***********' 

stop 
end  if 

GAMMAC  =  O.dO 

IF (  ALLOCATED (  GAMRNG  )  )  DEALLOCATE (  GAMRNG,  stat=ierror  ) 

ALLOCATE (  GAMRNG (IGC),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*) '****** ****ERROR  IN  GAMRNG  ALLOCATION***********' 

stop 
end  if 

GAMRNG  =  O.dO 

!  Read  GAMMAC  factor  and  corresponding  ranges  at  which  it  applies.  GAMMAC 
describes 

!  the  backscattering  effectiveness  of  the  surface  and  is  provided  in  dB. 

!  Ranges  of  ground  types  are  read  in  km. 

do  i  =  1 ,  igc 

read (  inf,  *  )  gammac(i),  grng 
gamrng(i)  =  grng  *  1 . d3 

end  do 

end  if 

read (  inf,  *  )  itp  (Number  of  terrain  range/height  points 

if (  itp  . gt .  1  )  then  !  Valid  terrain  profile  must  contain  at  least  two 

!  height/range  points. 

IF (  ALLOCATED (  TERX  )  )  DEALLOCATE (  TERX,  stat=ierror  ) 

ALLOCATE (  TERX (ITP),  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  TERX  ALLOCATION***********' 

stop 
end  if 

TERX  =  0. 

IF (  ALLOCATED (  TERY  )  )  DEALLOCATE (  TERY,  stat=ierror  ) 

ALLOCATE (  TERY (ITP),  stat=ierror  ) 
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if  (  ierror  . ne .  0  )  then 

write (*,*)' **********ERROR  IN  TERY  ALLOCATION***********' 

stop 
end  if 

TERY  =  0. 

do  i  =  1 ,  itp 

read (  inf,  *  )  terrain^x,  tery(i) 
terx(i)  =  terrain  x  *  l.d3 

end  do 

end  if 
close (inf) 

I  ******************************************************************** 

(Allocate  and  initialize  all  arrays  passed  through  parameter  lists. 

if (  allocated (  mpfl  )  )  deallocate (  mpfl,  stat=ierror  ) 

allocate (  mpfl (2, 0 : nzout) ,  stat  =  ierror  ) 
if  (  ierror  .ne.  0  )  then 

write  (*,*)' ******ERROR  IN  MPFL  ALLOCATION*******' 

stop 
end  if 

mpfl  =  0 

if  (  allocated (  propaf  )  )  deallocate (  propaf,  stat=ierror  ) 

allocate (  propaf ( 4 , nzout ) ,  stat=ierror  ) 
if  (  ierror  .ne.  0  )  then 

write (*,*) '******* *ERROR  IN  PROPAF  ALLOCATION********' 

stop 
end  if 

propaf  =  -999. dO 

I  **★★**★★**★★**★★**★★**★★**★★**★★**★★**★★**★★**★★**★★•*••*•★★•*••*•★★•*••*•★★•*••*•★★ 

I  kkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkkk 

!  These  arrays  are  only  necessary  to  output  everything  in  one  big  file 
if  (  lang  )  then 

if (  allocated (  angfac  )  )  deallocate (  angfac,  stat  =  ierror  ) 
allocate (  angf ac ( 4 , nzout , nrout ) ,  stat=ierror  ) 
if  (  ierror  . ne .  0  )  then 

write (*,*)' ********ERROR  IN  ANGFAC  ALLOCATION********' 

stop 
end  if 

angfac  =  -999. dO 

end  if 

if  (  allocated (  itloss  )  )  deallocate (  itloss,  stat=ierror  ) 

allocate (  itloss  ( 0 : nzout, nrout) ,  stat=ierror  ) 
if  (  ierror  .ne.  0  )  then 

write (*,*)' ******ERROR  IN  ITLOSS  ALLOCATION*******' 

stop 
end  if 

itloss  =  0 

if (  allocated (  itpfac  )  )  deallocate  (  itpfac,  stat=ierror  ) 

allocate (  itpfac ( 0 : nzout, nrout) ,  stat=ierror  ) 
if  (  ierror  .ne.  0  )  then 

write  (*,*)' ******ERROR  IN  ITPFAC  ALLOCATION*******' 

stop 
end  if 

itpfac  =  0 
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!  Allocate  and  initialize  CNR_dB  array  with  proper  size 
isize_cnr  =  1 

if (  clut  )  isize_cnr  =  nrout 

if  (  allocated  (  cnr_dB  )  )  deallocate (  cnr_dB,  stat=ierror  ) 

allocate  (  cnr_dB ( isize_cnr ) ,  stat=ierror  ) 
if  (  ierror  . ne.  0  )  then 

write ( * ,  *  )  '******* *ERROR  IN  CNR_dB  ALLOCATION********' 

stop 
end  if 

cnr_dB  =  0 . dO 

!  Write  all  input  parameters  that  create  the  resulting  output  propagation  loss 
!  values  as  part  of  the  log  file. 

call  write_log (  filein,  ioutf,  IP  ) 

hmin_bef  =  hmin 
hmax_bef  =  hmax 

alimv  =  O.dO  !  ***MAKE  SURE  THIS  VARIABLE  IS  INITIALIZED  TO  ZERO  BEFORE  ANY  *** 
!  *  *  * CALLS  TO  APMINIT.  THIS  IS  FOR  SPAWAR  USE  ONLY.**** 

!  Variables  in  CAPS  are  returned. 


call  apminit (  IXOSTP,  LGRAZE,  apmstatus,  IERROR  ) 


if  (  ierror  .ne.  0  )  then 

write (*,*)' ***********  ERROR  IN  APMINIT 
write (*,*)' ********  IERROR  =  ',  ierror, 

stop 
end  if 


'k'k'k'k'k'k'k'k'k'k'k'k'k'k  > 
'k'k'k-k-k'k'k'k'k'k  f 


!  After  call  to  APMINIT  return  grazing  angles  and  do  height  interpolation  on 
!  propagation  angles  (if  necessary) . 


ntmp  =  1 

if (  lgraze  )  ntmp  =  nrout 

if (  allocated (  graze_at_rout  )  )  deallocate (  graze_at_rout,  stat=ierror  ) 

allocate  (  graze_at_rout (ntmp) ,  stat=ierror  ) 
if  (  ierror  .ne.  0  )  then 

write (*,*)  '*********** *ERROR  IN  GRAZE_AT_ROUT  ALLOCATION************' 

Stop 
end  if 

graze_at_rout  =  O.dO 


if  (  lgraze  )  call  ret_graze (  GRAZE_AT_ROUT,  IERROR  ) 


!  Notify  user  that  HMIN  or  HMAX  has  been  changed  on  return  from  APMINIT. 
!  The  calculation  height  (HMAX-HMIN)  must  be  at  least  100  m. 


hmin_aft  =  hmin 

if (  dabs  (hmin_bef  -  hmin_aft)  . gt .  l.d-3  )  then 
write (ioutf, *) 

write  (ioutf , *)  '  ******************WARNING****************** 
write  ( ioutf ,* )  'HMIN  has  been  adjusted  to  ',  hmin,  'meters' 
write (ioutf, *) '  ******************************************* 

end  if 


hmax_aft  =  hmax 

if (  dabs (hmax_bef  -  hmax_aft)  . gt .  l.d-3  )  then 
write (ioutf, *) 

write (ioutf, *) '  ******************WARNING****************** 
write  ( ioutf ,* )  'HMAX  has  been  adjusted  to  ',  hmax,  'meters' 
write  (ioutf , *)  '  ******************************************* 
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end  if 


!  Create  and  write  header  info  for  extraneous  files, 
call  write  extra (  ip,  filein,  ioutrtg,  ioutcnr,  ioutaf  ) 

i  *********************  START  OF  MAIN  ARM  LOOP  *************************** 
do  istp  =  1,  nrout 

!  JSTART  =  start  of  valid  loss  points,  JEND  =  end  of  valid  loss 
!  points.  If  at  a  range  where  extended  optics  will  be  applied,  then 
!  JEND  will  be  the  index  at  top  of  PE  region  in  MPFL ( ) . 

call  apmstep (  istp,  ROUT,  MPFL,  JSTART,  JEND,  MPFL_RTG,  PROPAF  ) 

write (*,*)  'range  in  km  =  ',  rout*l.d-3  !Output  to  screen 

!  Store  loss  and  propagation  factor  points  in  2-dim.  grid  for  later  output  to 
file . 

itloss  (  0:nzout,  istp  )  =  mpfl (  1,  0:nzout  )  !prop  loss 
itpfac (  0:nzout,  istp  )  =  mpfl (  2,  0:nzout  )  !prop  factor 

!****  Output  to  separate  file  for  loss  relative  to  ground. ****** 

!***  NOTE:  ALL  HEIGHTS  SPECIFIED  FOR  LOSS  RELATIVE  TO  GROUND  ARE  ASSUMED  TO  BE 
AT 

! RELATIVELY  LOW  ALTITUDE  -  I.E.,  ALL  HEIGHTS  ARE  CONTAINED  WITHIN  THE  FE,  RO,  OR 
PE 

! REGIONS .  ******* 

if  (  lrtg  )  then 

write (  ioutrtg,  '  (  ( f 1 0 . 1 , 5x) \ )  ' ) rout* 1 . d-3 ,  (dble (mpf l_rtg ( 1 , i) * . 1 ) , 
i=l , nzout_rtg  ) 

write (  ioutrtg,  *  ) 

end  if 

!  If  necessary  move  values  in  PROPAF  to  larger  array  ANGFAC  for  later 
!  output  after  calls  to  XOINIT  &  XOSTEP. 

if  (  lang  )  angfac(l:4,  l:jend,  istp)  =  propaf(l:4,  l:jend) 

end  do 

if  (  lrtg  )  close  (ioutrtg) 

!  Initialize  variables  to  be  used  in  XO  model. 

call  xoinit (  graze_at_rout,  ixostp,  jend,  JXSTART,  CNR_dB,  IERROR  ) 
if  (  ierror  .gt.  0  )  then 

write (*,*)' *******ERROR  IN  XOINIT*******' 

stop 
end  if 

!  Output  height  increment  DZOUT,  as  determined  in  APMINIT,  is  computed  as 
!  DZOUT  =  (HMAX-HMIN)  /  f loat  (  NZOUT  ) 

!  Output  range  increment  DROUT,  as  determined  in  APMINIT,  is  computed  as 
!  DROUT  =  RMAX  /  float  (  NROUT  ) 

i  ****  Output  to  separate  file  for  clutter-to-noise  ratio  computed  in  XOINIT 

-k  -k  -k  -k  -k  -k 


if  (  clut  )  then 
do  i  =  1 ,  nrout 

write (  ioutcnr,  '  (2  (f 10 . 1 , 2x) )  ' )  drout*real ( i , 8 ) *  1 . d-3,  cnr  dB(i) 
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end  do 

close  (  ioutcnr  ) 

end  if 


!  If  extended  optics  model  needs  to  be  used,  then  call, 
if  (  ixostp  .gt.  0  )  then 
do  istp  =  ixostp,  nrout 


call  xostep (  istp,  ROUT 
write (*,*) 'range  in  km 
itloss (  j xstart : j xend, 
itpfac (  j xstart : j xend, 


,  MPFL,  jxstart, 
(XO  region)  =  ', 
istp  )  =  mpfl (  1 
istp  )  =  mpfl (  2 


JXEND,  PROPAF  ) 
rout*l.d-3  ! Output  to  screen 
jxstart: jxend  ) 
jxstart: jxend  ) 


if  (  lang  )  angfac(l:4,  j xstart : j xend,  istp) 


propaf(l:4,  j xstart : j xend) 


end  do 


end  if 

!  If  the  propagation  angles  and  factors  were  computed  (LANG  set  to  '.true.') 

!  then  output  all  values  in  array  ANGFAC. 

if  (  lang  )  then 

do  jk  =  1,  nrout 
do  i  =  1,  nzout 

angdegD  =  angfac (1 , i, j k)  /  radc 

if  (  angfac (1 , i , j k)  . le .  -998.99d0  )  angdegD  =  -999. dO 
pfd  =  angfac (2 , i, j k) 

if  (  angfac (2 , i , j k)  . le .  -998.99d0  )  pfd  =  -999 
angdegR  =  angfac (3, i, j k)  /  radc 

if  (  angfac (3, i, j k)  . le .  -998.99d0  )  angdegR  =  -999. dO 
pfr  =  angfac (4 , i , j k) 

if  (  angfac (4, i, j k)  . le .  -998.99d0  )  pfr  =  -999 
write  (  ioutaf,  '  (6(fl0.2,  2x) )  ' )  real  ( j k, 8 ) *drout*l . d-3, 
dzout*real  (i, 8)  ,  & 

angdegD,  pfd,  angdegR,  pfr 

end  do 
end  do 

close (  ioutaf  ) 
end  if 

(call  gettim(  ihr2,  imin2,  isec2,  H00th2  ) 

!time2  =  3600.*ihr2  +  60.*imin2  +  isec2  +  il00th2/100. 

(write (*,*) 'Execution  time  =  ',  time2-timel ,  '  secs' 

!  NOTE:  If  V  pol  is  specified,  then  there  can  be  NZOUT  +  1  valid  loss  points 

!  at  each  range,  where  the  extra  point  is  stored  in  MPFL(O) . 

!  10  is  a  common  variable  set  within  APMINIT  that  equals  0  or  1  depending  on  the 
!  polarization  used.  Therefore,  for  H  pol  cases,  NZOUT  points  will  be 

!  written  to  the  file  and  for  V  pol  cases  NZOUT+1  points  will  be  output. 

!  Now  store  all  loss  values  in  output  file  FILEOUT. 

!  Recall  that  MPFL  is  the  propagation  loss/factor  in  centibels,  i.e., 

!  MPFL ( )  =  NINT (  propagation  loss/factor  in  dB  *  10.  ) . 

write (  ioutf,  *  ) 

write (  ioutf,  *  ) ' ********0utput  Loss  and  Prop.  Factor  Values*******' 

!  Loop  for  writing  propagation  loss  &  factor  vs.  height  for  a  specified  range, 
if  (  nzout  . gt .  nrout  )  then 


81 


do  j  =  1,  nrout 
write (ioutf , * ) 

write (ioutf ,  '  (a, f 10 . 2 )  ' )  ' range  in  km=  ',  real  ( j , 8 ) *drout*l . d-3 
write (ioutf, * ) 

write (ioutf ,*)' Height (m)  Loss (dB)  PFac(dB)  ' 
do  k  =  io,  nzout 

ploss  =  itloss  (k, j ) * . 1 
pfac  =  itpfac ( k, j ) * . 1 

write (ioutf ,'( 3f 10 . 2 )' )  hmin  +  real  ( k, 8 ) *dzout ,  ploss,  pfac 

end  do 
end  do 

else 

!  Loop  for  writing  propagation  loss  &  factor  vs.  range  for  a  specified  height. 

do  k  =  io,  nzout 
write (ioutf, * ) 

write (ioutf, ' (a, f 10 . 2 ) ') ' Height  in  m  =  '  ,  real (k, 8 ) *dzout 
write (ioutf, * ) 

write (ioutf ,*)' Range  (km)  Loss  (dB)  Prop.  factor(dB)  ' 

do  j  =1,  nrout 

ploss  =  itloss  (k, j )*. 1 
pfac  =  itpfac ( k, j )*. 1 

write ( ioutf ,  '  ( 3 f 10 . 2 )' )  real ( j , 8 ) *drout* 1 . d-3,  ploss,  pfac 

end  do 
end  do 

end  if 

close  (ioutf) 

(Deallocate  all  allocated  arrays  in  main  driver  program  before  exiting. 

if (  allocated (  hfang  )  )  deallocate (  hfang,  stat=ierror  ) 

if  (  ierror  . ne.  0  )  then 

write (  *,  *)  ' ********ERR0R  IN  HFANG  DEALLOCATION*******' 

stop 
end  if 

if (  allocated (  hffac  )  )  deallocate (  hffac,  stat=ierror  ) 

if  (  ierror  .ne.  0  )  then 

write  (  *,  *)  ' ********ERR0R  IN  HFFAC  DEALLOCATION*******' 

stop 
end  if 

if  (  allocated (  terx  )  )  deallocate (  terx,  stat=ierror  ) 

if  (  ierror  .ne.  0  )  then 

write (  *,  *)  ' ********ERROR  IN  TERX  DEALLOCATION*******' 

Stop 
end  if 

if  (  allocated (  tery  )  )  deallocate (  tery,  stat=ierror  ) 

if  (  ierror  .ne.  0  )  then 

write (  *,  *)  ' ********ERROR  IN  TERY  DEALLOCATION*******' 

stop 
end  if 

deallocate  (  mpfl,  itloss,  itpfac,  mpfl_rtg,  cnr_dB,  graze_at_rout ,  & 
propaf  ) 

if (  lrtg  )  deallocate (  zoutrtg  ) 
if  (  lang  )  deallocate (  angfac  ) 
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end  subroutine  runapm 


!  ********  ************************  SUBROUTINE 

apmstatus** ************************  ********** 

subroutine  apmstatus (  lang,  r  ) 

implicit  integer ( kind=4 )  (i-n) 

implicit  real ( kind=8 )  (a-h,  o-z) 

logical (kind=4)  lang 
real  ( kind=8 )  r 

!  Status  for  stand-alone  APM  program. 

i  *  *  *  *  comment  this  line  if  incorporating  into  other  software  application  with 

GRAPHICS**** 


if  (  lang  )  then 

write (*,*)  'Computing  grazing  and  propagation  angles  for  range (km)  = 
r*l . d-3 

else 

write (*,*)  'Computing  grazing  angle  for  range (km)  =  ',  r*l.d-3 

end  if 

end  subroutine  apmstatus 
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8.  INPUT  FILE  LISTINGS  FOR  TEST  CASES 


Each  test  case,  when  using  the  sample  driver  program  APMMAIN.F90,  shall 
consist  of  an  input  file  (TestName.  IN)  and  an  output  file  ( Test  Name. OUT).  The  input 
file’s  contents  are  listed  in  sections  8.1  through  8.28.  The  output  file’s  contents, 
consisting  of  couplets  of  height  in  meters  and  propagation  loss  and  propagation  factor  in 
dB,  are  listed  in  Table  33  through  Table  80. 


8.1  ABSORB. IN 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1. 

. false . 

. false . 

. false . 
20000. 

25. 

1 

0 

5. 

0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

200. 

50. 

20 

1 

0 

0 

0. 

0. 

.  146 
0 

1 

2 

0. 

0. 

1000. 

0. 

1 

0.,  0,  0. 
1 

-10.,  0. 

0 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profile  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 


8.2  AFEVAP.IN 


.true. 

.true. 

. false . 

0. 

otherwise) 

1. 

. false . 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
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. false . 

.true. 

3000. 

25. 

1 

0 

0. 

0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

1000. 

50. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

17 

0. 

0.000 
0.135 
0.223 
0.368 
0.607 
1.000 
1 . 649 
2.718 
4.482 
7.389 
12 . 182 
20.086 
24.000 
33.115 
54.598 
90.017 
148.413 
0. 

1 

0.,  0,  0 
1 

-10.,  0. 

0 


:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
0.00 
-20.40 
-21.89 
-23.37 
-24 . 84 
-26.29 
-27.71 
-29.08 
-30.35 
-31.49 
-32.39 
-32.90 
-32.95 
-32.78 
-31.59 
-28.66 
-22.86 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 


8.3  AFSBD.IN 


.true. 

.true. 

. false . 

0. 

otherwise 

1. 

. false . 

. false . 
.true. 


3000. 

25. 

1 

0 

0. 

0. 

0 

0. 

0. 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

Antenna  gain  in  dBi  (used  for  clutter  calcs) 

Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 
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0. 

0. 

0. 

0. 

0. 

3000. 

100. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

4 

0. 

0. 

250. 

300. 

1500. 

0. 

1 

0.,  0,  0 
1 

-10.,  0. 

0 


:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
339. 

368.5 

319. 

460.6 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 


8.4  AFSTD.IN 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1. 

. false . 
. false . 
.true. 
1000. 
25. 

1 

0 

0. 

0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

1000. 

50. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '.false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 
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1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.5  AIRBORNE. IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false.' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

900.  :  Frequency  in  MHz 

2500.  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

32.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

1.5  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

1.3  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

285.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

8.4  :  System  losses  in  dB  (used  for  clutter  calcs) 

10.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

5000.  :  Maximum  output  height  in  m 

250.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

5  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profile  in  km 

0.  209.2  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1100.  339.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

1500.  386.2  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1625.  361.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

5625.  833.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  5 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.6  BLOCK.IN 


.true. 

.true. 

. false . 

0. 

otherwise) 

1. 

. false . 

. false . 

. false . 
1000. 

101. 

1 

1 

0. 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
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0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

400. 

60. 

20 

1 

0 

0 

7.5 

0. 

0. 

0 

1 

2 

0. 

0 

1000 

0. 

1 

0.  ,  7 
1 

-10. , 

6 

0. 

10.0 

10.0 

40.0 

40.0 

60.0 


:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profile  in  km 

350  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 

7.5,  0.01  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 
1  :  Range (km)  &  height  of  terrain  point  1 

1  :  Range (km)  &  height  of  terrain  point  2 

200 
200 
1 
1 


8.7  CLEVAPW.IN 


. false . 
.true. 

. false . 

0. 

1. 

. false . 
.true. 

. false . 
10000. 
25. 

3 

1 

2. 

0. 

0 

32. 

1.5 

1.3 
285. 

8.4 
10. 

0. 

1000. 

100. 

2 

100 

0 

0 

0. 

0. 

0. 

1 

10.,  0. 
1 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 
:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '.false. ' =no  clutter,  ' . true . ' =clutter  calcs 

:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Wind  speed  (m/s) ,  range  (km) 

:  Number  of  refractivity  profiles 
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50  : 

0.  : 

0.000000 
0.833333 

1.666667 

2.500000 

3.333333 

4.166667 
5.000000 

5.833333 

6.666667 

7.500000 

8.333333 

9.166667 
10.000000 

10.833333 

11.666667 

12.500000 

13.333333 

14 .166667 
15.000000 

15.833333 

16.666667 

17.500000 

18.333333 

19.166667 
20.000000 

20.833333 

21.666667 

22.500000 

23.333333 

24 .166667 
25.000000 

25.833333 

26.666667 

27.500000 

28.333333 

29.166667 
30.000000 

30.833333 

31.666667 

32.500000 

33.333333 

34.166667 
35.000000 

35.833333 

36.666667 

37.500000 

38.333333 

39.166667 
40.000000 
1200.000000 
0.  : 

1  : 

0.,0,  0.,  0. 
1  : 


Number  of  levels  in  refractivity  profiles 

Range  of  first  refractivity  profiles  in  km 
339.000000 
318.405284 
316.841934 
315.968883 
315.378476 
314 . 942950 
314.605389 
314.335435 
314 .114965 
313.932289 
313.779427 
313.650685 
313.541859 
313.449758 
313.371900 
313.306318 
313.251426 
313.205927 
313.168748 
313.138987 
313.115883 
313.098787 
313.087139 
313.080455 
313.078311 
313.080339 
313.086209 
313.095632 
313.108350 
313.124130 
313 . 142767 
313.164071 
313.187874 
313.214022 
313.242374 
313.272804 
313.305194 
313.339436 
313.375432 
313.413091 
313.452328 
313.493066 
313.535231 
313.578758 
313.623583 
313.669648 
313.716898 
313.765283 
313.814755 
444.851829 

Wind  direction  in  deg  (only  used  for  clutter  calcs) 

Number  of  ground  composition  types 

:  Range (km),  ground  type  (integer),  permittivity,  conductivity 

Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0 


if 


-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC / GAMRNG 


0 


Number  of  terrain  range/height  points 


terrain  is  specified) 
pairs  is  0) 
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. false . 
.true. 

. false . 

0. 

1 . 

. false . 
.true. 

. false . 
10000. 
25. 

3 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 
:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
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1  : 

2.  : 

0.  : 

0  : 

32.  : 

1.5  : 

1.3  : 

285.  : 

8.4  : 

10.  : 

0.  : 

1000.  : 

100.  : 

2  : 

100  : 

0  : 

0  : 

0.  : 

0.  : 

0.  : 

1  : 

10.,  0.  : 
1  : 

50  : 

0.  : 

0.000000 
0.833333 

1.666667 

2.500000 

3.333333 

4.166667 
5.000000 

5.833333 

6.666667 

7.500000 

8.333333 

9.166667 
10.000000 

10.833333 

11.666667 

12.500000 

13.333333 

14 .166667 
15.000000 

15.833333 

16.666667 

17.500000 

18.333333 

19.166667 
20.000000 

20.833333 

21 . 666667 

22.500000 

23.333333 

24 .166667 
25.000000 

25.833333 

26.666667 

27.500000 

28.333333 

29.166667 
30.000000 

30.833333 

31.666667 

32.500000 

33.333333 

34.166667 
35.000000 

35.833333 

36.666667 

37.500000 

38.333333 

39.166667 
40.000000 
1200.000000 


Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 
Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

Antenna  gain  in  dBi  (used  for  clutter  calcs) 

Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

Pulse  length  in  microseconds  (used  for  clutter  calcs) 

Transmitter  power  in  kW  (used  for  clutter  calcs) 

System  losses  in  dB  (used  for  clutter  calcs) 

Noise  figure  in  dB  (used  for  clutter  calcs) 

Minimum  output  height  in  m 
Maximum  output  height  in  m 
Maximum  output  range  in  km 
Number  of  output  height  points 
Number  of  output  range  points 

Number  of  receiver  heights  relative  to  ground 
Extrapolation  flag 
Surface  absolute  humidity  in  g/m3 
Surface  air  temperature  in  degrees 
Gaseous  absorption  attenuation  rate  in  dB/km 
Number  of  wind  speeds/ranges  specified 
Wind  speed  (m/s) ,  range  (km) 

Number  of  refractivity  profiles 
Number  of  levels  in  refractivity  profiles 
Range  of  first  refractivity  profiles  in  km 
339.000000 
318.405284 
316.841934 
315.968883 
315.378476 
314 . 942950 
314.605389 
314.335435 
314 .114965 
313.932289 
313.779427 
313.650685 
313.541859 
313.449758 
313.371900 
313.306318 
313.251426 
313.205927 
313.168748 
313.138987 
313.115883 
313.098787 
313.087139 
313.080455 
313.078311 
313.080339 
313.086209 
313.095632 
313.108350 
313.124130 
313.142767 
313.164071 
313.187874 
313.214022 
313.242374 
313.272804 
313.305194 
313.339436 
313.375432 
313.413091 
313.452328 
313.493066 
313.535231 
313.578758 
313.623583 
313.669648 
313.716898 
313.765283 
313.814755 
444 . 851829 
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0. 

1 

o.,o,  0., 
1 

-10.,  0. 

0 


:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 

0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 
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. false . 
.true. 

. false . 

0. 

1. 

. false . 
.true. 

. false . 
3000. 

15. 

5 

0 

1.5 
0.5 
0 

39. 

2.0 

9. 

2000. 

3. 

5.5 

0. 

1000. 

100. 

2 

100 

0 

0 

0. 

0. 

0. 

1 

10.,  0. 

1 

4 

0. 

0. 

250. 

300. 

1500. 

0. 

1 

0.,0,  0., 

0 

0 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

:  Antenna  gain  in  dBi 
:  Horizontal  beamwidth  in  deg 
:  Pulse  length  in  microseconds 
:  Transmitter  power  in  kW 
:  System  losses  in  dB 
:  Noise  figure  in  dB 
:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Wind  speed  (m/s) ,  range  (km) 

:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
339. 

368.5 

319. 

460.6 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 

0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  Number  of  terrain  range/height  points 
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. false . 
.true. 

. false . 

0. 

1. 

. false . 
.true. 

. false . 
5600. 

15. 

3 

0 

16. 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 
:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 
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0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

0  :  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

30.  :  Antenna  gain  in  dBi 

1.5  :  Horizontal  beamwidth  in  deg 

1.3  :  Pulse  length  in  microseconds 

230.  :  Transmitter  power  in  kW 

3.  :  System  losses  in  dB 

5.  :  Noise  figure  in  dB 

0.  :  Minimum  output  height  in  m 

3000.  :  Maximum  output  height  in  m 

200.  :  Maximum  output  range  in  km 

2  :  Number  of  output  height  points 

100  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

1  :  Number  of  wind  speeds/ranges  specified 

10.,  0.  :  Wind  speed  (m/s),  range  (km) 

1  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  339. 

250.  368.5 

300.  319. 

1500.  460.6 

45.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

2  :  Number  of  ground  composition  types 

0.,0,  0.,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

100. . 4,  0.,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

2  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-5.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

-10.,  100.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

265  :  Number  of  terrain  range/height  points 

0  0 

100  0 

100.5682  2 

101.1364  2 

101.7045  2 

102.2727  3 

102.8409  4 

103.4091  5 

103.9773  4 

104.5455  7 

105.1136  6 

105.6818  9 

106.25  12 
106.8182  9 

107.3864  9 

107.9545  8 

108.5227  10 

109.0909  19 

109.6591  21 

110.2273  27 

110.7955  32 

111.3636  32 

111.9318  47 

112.5  43 

113.0682  58 

113.6364  82 

114.2045  75 

114.7727  96 

115.3409  63 

115.9091  100 

116.4773  123 

117.0455  98 

117.6136  95 

118.1818  100 

118.75  106 
119.3182  100 

119.8864  108 

120.4545  89 

121.0227  90 

121.5909  95 
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122  . 

.1591 

89 

122  . 

.7273 

107 

123. 

.2955 

97 

123. 

.8636 

108 

124  . 

.4318 

87 

125 

76 

125. 

.5682 

73 

126. 

.  1364 

88 

126. 

.7045 

86 

127  . 

.2727 

101 

127  . 

.8409 

101 

128  . 

.4091 

92 

128  . 

.  9773 

65 

129. 

.5455 

62 

130. 

.1136 

47 

130. 

.6818 

59 

131. 

.25  44 

131. 

.8182 

33 

132  . 

.3864 

21 

132  . 

.9545 

20 

133. 

.5227 

21 

134. 

.0909 

11 

134. 

.6591 

7 

135. 

.2273 

7 

135. 

.7955 

4 

136. 

.3636 

12 

136. 

.9318 

9 

137  . 

.5  6 

138. 

.0682 

5 

138. 

.6364 

7 

139. 

.2045 

5 

139. 

.7727 

8 

140. 

.3409 

14 

140. 

.9091 

7 

141 . 

.4773 

12 

142  . 

.0455 

10 

142  . 

.6136 

8 

143. 

.1818 

14 

143. 

.75  15 

144  . 

.3182 

18 

144  . 

.8864 

29 

145. 

.4545 

78 

146. 

.0227 

76 

146. 

.5909 

89 

147  . 

.1591 

139 

147  . 

.7273 

168 

148  . 

.2955 

173 

148  . 

.8636 

184 

149. 

.4318 

193 

150 

232 

150. 

.5682 

227 

151. 

.1364 

264 

151. 

.7045 

222 

152. 

.2727 

267 

152. 

.8409 

247 

153. 

.4091 

287 

153. 

.  9773 

363 

154  . 

.5455 

427 

155. 

.1136 

399 

155. 

.6818 

344 

156. 

.25  258 

156. 

.8182 

188 

157. 

.3864 

182 

157. 

.9545 

94 

158. 

.5227 

85 

159. 

.0909 

63 

159. 

.6591 

43 

160. 

.2273 

18 

160. 

.7955 

16 

161. 

.3636 

16 

161. 

.9318 

13 

162. 

.5  21 

163. 

.0682 

20 

163. 

.6364 

22 

164  . 

.2045 

26 
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164  . 

.7727 

27 

165. 

.3409 

31 

165. 

.9091 

45 

166. 

.4773 

58 

167. 

.0455 

64 

167. 

.6136 

87 

168. 

.1818 

92 

168. 

.75  112 

169. 

.3182 

124 

169. 

.8864 

144 

170. 

.4545 

178 

171 . 

.0227 

154 

171 . 

.5909 

172 

172  . 

.1591 

192 

172  . 

.7273 

192 

173. 

.2955 

196 

173. 

.8636 

216 

174  . 

.4318 

222 

175 

234 

175. 

.5682 

236 

176. 

.1364 

262 

176. 

.7045 

287 

177  . 

.2727 

372 

177  . 

.8409 

546 

178  . 

.4091 

699 

178  . 

.  9773 

821 

179. 

.5455 

682 

180. 

.1136 

544 

180. 

.6818 

477 

181. 

.25  509 

181. 

.8182 

510 

182  . 

.3864 

546 

182  . 

.9545 

582 

183. 

.5227 

844 

184  . 

.0909 

873 

184  . 

.6591 

776 

185. 

.2273 

819 

185. 

.7955 

830 

186. 

.3636 

814 

186. 

.9318 

860 

187  . 

.5  870 

188. 

.0682 

993 

188. 

.6364 

901 

189. 

.2045 

886 

189. 

.7727 

946 

190. 

.3409 

911 

190. 

.9091 

1025 

191. 

.4773 

1123 

192  . 

.0455 

1262 

192  . 

.6136 

1424 

193. 

.1818 

1460 

193. 

.75  1442 

194  . 

.3182 

1348 

194  . 

.8864 

1152 

195. 

.4545 

940 

196. 

.0227 

1256 

196. 

.5909 

1111 

197  . 

.1591 

943 

197  . 

.7273 

1037 

198. 

.2955 

931 

198. 

.8636 

759 

199. 

.4318 

673 

200 

702 

200. 

.5682 

607 

201 . 

.1364 

649 

201 . 

.7045 

576 

202  . 

.2727 

551 

202  . 

.8409 

548 

203. 

.4091 

548 

203. 

.  9773 

551 

204  . 

.5455 

546 

205. 

.1136 

545 

205. 

.6818 

547 

206. 

.25  556 

206. 

.8182 

569 

94 


207  . 

.3864 

576 

207  . 

.9545 

610 

208. 

.5227 

636 

209. 

.0909 

634 

209. 

.6591 

704 

210. 

.2273 

736 

210. 

.7955 

719 

211 . 

.3636 

702 

211  . 

.9318 

714 

212  . 

.5  691 

213. 

.0682 

676 

213. 

.6364 

671 

214  . 

.2045 

671 

214  . 

.7727 

708 

215. 

.3409 

668 

215. 

.9091 

674 

216. 

.4773 

688 

217  . 

.0455 

638 

217  . 

.6136 

661 

218  . 

.1818 

652 

218  . 

.75  673 

219. 

.3182 

673 

219. 

.8864 

665 

220. 

.4545 

703 

221 . 

.0227 

671 

221 . 

.5909 

685 

222  . 

.1591 

730 

222  . 

.7273 

722 

223. 

.2955 

737 

223. 

.8636 

709 

224  . 

.4318 

752 

225 

767 

225. 

.5682 

774 

226. 

.1364 

728 

226. 

.7045 

749 

227  . 

.2727 

761 

227  . 

.8409 

759 

228  . 

.4091 

815 

228  . 

.  9773 

836 

229. 

.5455 

896 

230. 

.1136 

924 

230. 

.6818 

956 

231 . 

.25  1136 

231 . 

.8182 

1187 

232  . 

.3864 

1353 

232  . 

.9545 

1313 

233. 

.5227 

1153 

234  . 

.0909 

1111 

234  . 

.6591 

1095 

235. 

.2273 

1094 

235. 

.7955 

1249 

236. 

.3636 

1334 

236. 

.9318 

1286 

237  . 

.5  1235 

238. 

.0682 

1181 

238. 

.6364 

1165 

239. 

.2045 

1196 

239. 

.7727 

1207 

240. 

.3409 

1257 

240. 

.9091 

1177 

241 . 

.4773 

1237 

242  . 

.0455 

1186 

242  . 

.6136 

1085 

243. 

.1818 

964 

243. 

.75  897 

244  . 

.3182 

861 

244  . 

.8864 

806 

245. 

.4545 

796 

246. 

.0227 

780 

246. 

.5909 

773 

247  . 

.1591 

767 

247  . 

.7273 

764 

248  . 

.2955 

761 

248  . 

.8636 

753 

249. 

.4318 

750 

95 


8.11  COSEC2.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

4  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.12  EDUCT.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

10000.  :  Frequency  in  MHz 

15.  :  Antenna  height  in  m 

2  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 
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0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

200.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

21  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 


0. 

339. 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

i 

.040 

335.10 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

2 

.  1 

333.66 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

3 

.2 

332.6 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

4 

.398 

331.54 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

5 

.794 

330.51 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

6 

1.585 

329.53 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

7 

3.162 

328.65 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

8 

6.310 

327.96 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

9 

12.589 

327.68 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

10 

14  . 

327 . 67 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

11 

25.119 

328.13 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

12 

39.811 

329.25 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

13 

50.119 

330.18 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

14 

63.096 

331.44 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

15 

79.433 

333.12 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

16 

100. 

335.33 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

17 

125.893 

338.2 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

18 

158.489 

341 . 92 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

19 

199.526 

346.69 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

20 

209.526 

347 . 87 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

21 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  OF  GAMMAC / GAMRNG  PAIRS  IS  0)0 
Number  of  terrain  range/height  points 

8.13  EDUCTRF.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

10000.  :  Frequency  in  MHz 

15.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

200.  :  Maximum  output  height  in  m 

100.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 
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0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

1  :  Number  of  wind  speeds/ranges  specified 

10.,  0.  :  Wind  speed  (m/s).  Range (km) 

1  :  Number  of  refractivity  profiles 

21  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 


0. 

339. 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

i 

.040 

335.10 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

2 

.1 

333.66 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

3 

.2 

332.6 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

4 

.398 

331.54 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

5 

.794 

330.51 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

6 

1.585 

329.53 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

7 

3.162 

328.65 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

8 

6.310 

327 . 96 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

9 

12.589 

327 . 68 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

10 

14  . 

327 . 67 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

11 

25.119 

328.13 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

12 

39.811 

329.25 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

13 

50.119 

330.18 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

14 

63.096 

331.44 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

15 

79.433 

333.12 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

16 

100. 

335.33 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i. 

level 

17 

125.893 

338.2 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

18 

158.489 

341 . 92 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

19 

199.526 

346.69 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

20 

209.526 

347 . 87 

Height 

& 

M-unit 

value 

of 

ref . 

profile 

i, 

level 

21 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.14  FLTA50.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '.false.'=no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

50 .  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

100.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 
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1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  7,  7.,  0.01  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

2  :  Number  of  terrain  range/height  points 

0.  10 

50.0  10 


8.15  GASABS.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

20000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

200.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

10.  :  Surface  absolute  humidity  in  g/m3 

25.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.16  GAUSS. IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter,  ' . true . ' =troposcatter 
.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
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.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.17  HEIGHT  RTG 
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:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

) 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 

:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 
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0. 
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1000. 
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:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 

0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 


1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC / GAMRNG 


304  :  Number  of  terrain 


0 . 0000000e+000 
6.0761706e-002 
1 ,2152341e-001 
1 ,8228512e-001 
2 . 4304682e-001 
3 . 0380853e-001 
3 . 6457023e-001 
4.2533194e-001 
4 . 8609365e-001 
5 . 4685543e-001 
6 . 07  617 13e-001 
6 . 6837891e-001 
7 . 2  914069e-001 
7 . 8990240e-001 
8 . 5066410e-001 
9 . 1142588e-001 
9 . 7218759e-001 
1 . 032  94  93e+000 
1 ,0937111e+000 
1 . 1544729e+000 
1 ,2152346e+000 
1 . 2759963e+000 
1 ,3367580e+000 
1 . 3975197e+000 
1 . 4582814e+000 
1.5190431e+000 
1 . 5798048e+000 
1 . 6405665e+000 
1 . 7013282e+000 
1 . 7  6208  99e+000 
1 . 8228516e+000 
1 . 8836133e+000 
1.9443750e+000 
2 . 0051368e+000 
2 . 0658985e+000 
2 . 1266602e+000 
2 . 1874219e+000 
2.248 1 836e+000 
2 . 3089453e+000 
2 . 3697070e+000 
2 . 4304687e+000 
2 . 4912305e+000 
2 . 5519922e+000 
2 . 6127540e+000 
2 . 6735157e+000 
2 . 7342773e+000 
2 . 7950390e+000 
2 . 8558007e+000 
2 . 9165624e+000 
2 . 9773241e+000 
3 . 0380859e+000 
3 . 0988476e+000 
3 . 1596093e+000 
3 . 22037 10e+000 
3.28 1 1327e+000 
3 . 3418944e+000 
3 . 4026561e+000 
3 . 4634178e+000 
3 . 5241795e+000 
3 . 5849412e+000 
3 . 6457029e+000 
3 . 7064646e+000 


2 . 9950500e+002 
2 . 9310199e+002 
2 . 8529070e+002 
2 . 7547598e+002 
2 . 7400000e+002 
2 . 8218547e+002 
2 . 9534749e+002 
3 . 0293684e+002 
3 . 0329591e+002 
3 . 0301469e+002 
3 . 0400000e+002 
3 . 0374435e+002 
3 . 0016827e+002 
2 . 9682011e+002 
2 . 9299658e+002 
2 . 8775906e+002 
2 . 8185390e+002 

2 . 7  664  625e+002 
2 . 7279881e+002 
2 . 6911534e+002 
2 . 6361136e+002 
2 . 5725418e+002 
2 . 4591124e+002 
2 . 4389800e+002 
2 . 4315492e+002 
2 . 4032027e+002 
2 . 3723561e+002 
2 . 3557093e+002 
2 . 3314804e+002 
2 ,2832272e+002 
2 . 2403300e+002 
2 . 1926640e+002 
2 . 1450175e+002 
2 . 1318040e+002 
2 . 1300000e+002 
2 . 1257439e+002 
2 . 1103692e+002 
2 . 0862110e+002 
2 . 0592163e+002 
2 . 0322217e+002 
2 . 0052271e+002 
1 . 9778542e+002 
1 . 9450880e+002 
1 . 9178333e+002 
1 . 8908433e+002 

1 . 8  638532e+002 
1 . 8460125e+002 
1 . 8354216e+002 
1 . 8300000e+002 
1 ,8274251e+002 
1 ,8200000e+002 
1 . 8200000e+002 
1 ,8200000e+002 
1 . 7958674e+002 
1 ,7464175e+002 
1 . 6924086e+002 
1 . 6459898e+002 
1 . 6071616e+002 
1 . 5688949e+002 
1 . 5341644e+002 
1 . 5127932e+002 
1 . 4716528e+002 


range/height 


points 


terrain  is  specified) 
pairs  is  0) 


101 


3 . 7  6722  63e+000 
3 . 8279881e+000 
3 . 8887498e+000 
3 . 9495115e+000 
4 . 0102732e+000 
4 . 0710348e+000 
4 . 1317965e+000 
4 . 1925582e+000 
4 . 2533201e+000 
4 . 3140818e+000 
4 . 3748436e+000 
4 . 4356053e+000 
4 . 4963670e+000 
4 . 5571287e+000 
4 . 6178904e+000 
4 . 678  652 le+OOO 
4 . 7394138e+000 
4 . 8001755e+000 
4 . 8609372e+000 
4 . 9216989e+000 
4 . 9824606e+000 
5 . 0432223e+000 
5. 1039840e+000 
5 . 1647457e+000 
5 . 2255074e+000 
5 . 28  62  691e+000 
5 . 3470308e+000 
5 . 4077925e+000 
5 . 4685543e+000 
5 . 5293160e+000 
5 . 5900777e+000 
5 . 6508394e+000 
5 . 7116012e+000 
5 . 7723629e+000 
5 . 8331246e+000 
5 . 8938865e+000 
5 . 9546483e+000 
6 . 0154100e+000 
6 . 07  617 17e+000 
6 . 1369335e+000 
6 . 1 97  6953e+000 
6 . 2584570e+000 
6 . 3192187e+000 
6 . 3799804e+000 
6 . 4407422e+000 
6 . 5015040e+000 
6 . 5622658e+000 
6 . 6230275e+000 
6 . 6837892e+000 
6 . 7445509e+000 
6 . 8053127e+000 
6 . 8660744e+000 
6 . 9268362e+000 
6 . 9875980e+000 
7 . 0483599e+000 
7 . 1091217e+000 
7 . 1698835e+000 
7 . 2306452e+000 
7 ,2914070e+000 
7 . 3521688e+000 
7 . 4129305e+000 
7 . 4736924e+000 
7 . 5344542e+000 
7 . 5952161e+000 
7 . 6559780e+000 
7 . 7167398e+000 
7 . 7775017e+000 
7 . 8382635e+000 
7 . 8990254e+000 
7 . 9597872e+000 
8 . 0205491e+000 
8 . 0813109e+000 
8 . 1420727e+000 
8 . 2028345e+000 
8 . 2  635962e+000 


1 . 4389636e+002 
1 .3923192e+002 
1 . 3421815e+002 
1 .2808321e+002 
1 ,2426357e+002 
1 .2304306e+002 
1 ,2284360e+002 
1 . 2309907e+002 
1 . 2394364e+002 
1 ,2442499e+002 
1 . 2352  635e+002 
1 . 234  808  8e+002 
1 ,2320301e+002 
1 ,2245950e+002 
1 . 2 1 90808e+002 
1 ,2169107e+002 
1 ,2153794e+002 
1 ,2127808e+002 
1 ,2213782e+002 
1 ,2863134e+002 
1 . 3110240e+002 
1 . 3016863e+002 
1 ,2942360e+002 
1 ,2834528e+002 
1 ,2642025e+002 
1 ,2417204e+002 
1 . 22  607 12e+002 
1 ,2218517e+002 
1 . 2197993e+002 
1 . 1954888e+002 
1 . 1594994e+002 
1 . 1235100e+002 
1 .0950149e+002 
1 .0639660e+002 
1 . 0313536e+002 
1 .0015476e+002 
9 . 7891421e+001 
9 . 6564563e+001 
9 . 6000000e+001 
9 . 6030080e+001 
9 . 6591542e+001 
9 . 7471706e+001 
9 . 8371421e+001 
9 . 9271143e+001 
1 . 0017087e+002 
1.0107060e+002 
1 .0197034e+002 
1.0311686e+002 
1 .0476984e+002 
1 .0571601e+002 
1.0751559e+002 
1.0899628e+002 
1 . 1027310e+002 
1 . 1191438e+002 
1 . 1371398e+002 
1.1551360e+002 
1 . 1731322e+002 
1 . 1911284e+002 
1.2085786e+002 
1 ,2243519e+002 
1 ,2625557e+002 
1 . 2  98  6853e+002 
1.3393133e+002 
1.3809119e+002 
1 . 4313355e+002 
1 .4659434e+002 
1.4817706e+002 
1 .4988962e+002 
1.5039665e+002 
1 .5057576e+002 
1 .4989814e+002 
1.4648570e+002 
1 . 4835292e+002 
1.5058030e+002 
1.5133977e+002 
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8 . 3243579e+000 
8 . 3851197e+000 
8 . 4458815e+000 
8 . 5066434e+000 
8 . 5674052e+000 
8 . 6281670e+000 
8 . 6889288e+000 
8 . 7496905e+000 
8 . 8104523e+000 
8 . 8712141e+000 
8 . 9319758e+000 
8 . 9927375e+000 
9 . 0534993e+000 
9 . 1142610e+000 
9 . 1750227e+000 
9 . 2357844e+000 
9 . 2  9654  62e+000 
9 . 357307  9e+000 
9 . 4180696e+000 
9 . 4788314e+000 
9 . 5395931e+000 
9 . 600354  8e+000 
9 . 6611165e+000 
9 . 7218782e+000 
9 . 7826400e+000 
9 . 8434017e+000 
9 . 904 1 634e+000 
9 . 9649251e+000 
1.0025687e+001 
1.0086448e+001 
1.0147210e+001 
1.0207972e+001 
1 .0268734e+001 
1 .0329495e+001 
1.0390257e+001 
1 .0451019e+001 
1.0511780e+001 
1.0572542e+001 
1.0633304e+001 
1.0694065e+001 
1.0754827e+001 
1.0815589e+001 
1.0876351e+001 
1.0937112e+001 
1.0997874e+001 
1.1058636e+001 
1 . 1119397e+001 
1 . 1180159e+001 
1 . 1240921e+001 
1.1301683e+001 
1 . 1362444e+001 
1 . 1423206e+001 
1.1483968e+001 
1 . 1544729e+001 
1 . 1605491e+001 
1 . 1666253e+001 
1 . 1727015e+001 
1 . 178777  6e+001 
1.1848538e+001 
1 . 1909300e+001 
1 . 1970061e+001 
1.2030823e+001 
1 .2091585e+001 
1 ,2152347e+001 
1 .2213108e+001 
1 .2273870e+001 
1 ,2334632e+001 
1.2395393e+001 
1 ,2456155e+001 
1 .2516917e+001 
1 ,2577678e+001 
1 ,2638440e+001 
1 ,2699202e+001 
1 ,2759964e+001 
1 ,2820725e+001 


1.5134179e+002 
1.5134395e+002 
1 .5134624e+002 
1 .5134867e+002 
1.5135123e+002 
1 .5135393e+002 
1.4873290e+002 
1 . 4685104e+002 
1 . 4540519e+002 
1 . 4425930e+002 
1 . 4121540e+002 
1.3740409e+002 
1.3514239e+002 
1.3187107e+002 
1.3348579e+002 
1 . 3596048e+002 
1.3895951e+002 
1 .4199633e+002 
1 .4527156e+002 
1.4951941e+002 
1.5200000e+002 
1.5200000e+002 
1 .5214912e+002 
1 .5276486e+002 
1.5369799e+002 
1.5539260e+002 
1.5802300e+002 
1 . 6164928e+002 
1.6508088e+002 
1.6942093e+002 
1 . 7  4  6004  8e+002 
1 . 7792114e+002 
1.7792418e+002 
1 . 7782666e+002 
1.7720373e+002 
1 .7754017e+002 
1 . 77  87  615e+002 
1 .7682012e+002 
1 . 7  68  8705e+002 
1.7788968e+002 
1.7971680e+002 
1.8311357e+002 
1.8702959e+002 
1.8758687e+002 
1.8618577e+002 
1 . 8496084e+002 
1.8154109e+002 
1.768741 6e+002 
1 .7082137e+002 
1 . 6622341e+002 
1 . 6240798e+002 
1.5920693e+002 
1 .5747477e+002 
1.5420958e+002 
1.5214325e+002 
1.5615842e+002 
1 .5805664e+002 
1.5844509e+002 
1.5887424e+002 
1.5964437e+002 
1.5940992e+002 
1.5826843e+002 
1.5718705e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
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1 ,2881487e+001 
1 ,2942249e+001 
1 .3003010e+001 
1.3063772e+001 
1.3124534e+001 
1 .3185295e+001 
1.3246057e+001 
1.3306819e+001 
1.3367581e+001 
1.3428342e+001 
1.3489104e+001 
1.3549866e+001 
1.3610627e+001 
1.3671389e+001 
1.3732151e+001 
1.3792913e+001 
1 .3853674e+001 
1.3914436e+001 
1.3975198e+001 
1 . 4035960e+001 
1.4096721e+001 
1.4157483e+001 
1.4218245e+001 
1.4279007e+001 
1 . 4339768e+001 
1 . 4400530e+001 
1 . 4461292e+001 
1 . 4522054e+001 
1 . 4582815e+001 
1 . 4643577e+001 
1.4704339e+001 
1 .4765100e+001 
1 .4825862e+001 
1 .4886624e+001 
1.4947385e+001 
1 .5008147e+001 
1.5068909e+001 
1 .5129671e+001 
1.5190432e+001 
1.5251194e+001 
1.5311956e+001 
1.5372718e+001 
1.5433479e+001 
1.5494241e+001 
1.5555003e+001 
1.5615765e+001 
1 .5676526e+001 
1 .5737288e+001 
1.5798050e+001 
1.5858812e+001 
1.5919573e+001 
1.5980335e+001 
1 . 6041097e+001 
1.6101859e+001 
1 . 6162620e+001 
1 . 6223382e+001 
1 . 6284144e+001 
1 . 6344906e+001 
1.6405668e+001 
1.6466430e+001 
1 . 6527191e+001 
1.6587953e+001 
1 . 6648715e+001 
1 . 670947  6e+001 
1 . 6770238e+001 
1.6831000e+001 
1 . 68  917  62e+001 
1 . 6952524e+001 
1.7013286e+001 
1.7074047e+001 
1 .7134809e+001 
1.7195571e+001 
1.7256332e+001 
1.7317094e+001 
1.7377856e+001 


1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5510919e+002 
1.5533661e+002 
1.5533592e+002 
1.5532745e+002 
1.5502576e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1.5500000e+002 
1.5500000e+002 
1.5500000e+002 
1 .5500000e+002 
1 .5552616e+002 
1.5942040e+002 
1 . 6331327e+002 
1.6666884e+002 
1.6948810e+002 
1.7238837e+002 

1 . 7  4  68  900e+002 

1 . 7  677 150e+002 
1 .7864255e+002 

1 . 7  96907  6e+002 
1 .8111975e+002 
1 .8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1 .8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1 .8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8200000e+002 
1.8655453e+002 
1 . 9146493e+002 
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1.7438618e+001 
1.7499379e+001 
1 .7560141e+001 
1.7620903e+001 
1 . 7  68 1 665e+001 
1 .7742426e+001 
1.7803188e+001 
1.7863950e+001 
1.7924712e+001 
1.7985473e+001 
1.8046235e+001 
1.8106997e+001 
1 . 8167759e+001 
1 . 8228520e+001 
1.8289282e+001 
1.8350044e+001 
1 .8410806e+001 


1 . 9382147e+002 
1.9409382e+002 
1 . 9341049e+002 
1.9333171e+002 
1.9270308e+002 
1 . 9244155e+002 
1 . 9184128e+002 
1.9150346e+002 
1 . 9142251e+002 
1 . 9142456e+002 
1.9101353e+002 
1.9011578e+002 
1 . 8  94307  6e+002 
1.8954540e+002 
1.9045081e+002 
1.9160600e+002 
1.9311592e+002 


8.18  HF10TER 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

10.  :  Frequency  in  MHz 

20.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI , USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI, USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

249.  :  Maximum  output  range  in  km 

2.  :  Number  of  output  height  points 

30  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

2  :  Number  of  ground  composition  types 

0.,  7,  80.,  4.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

80.,  7,  5.0,  .0001  :  Range (km),  ground  type  (integer),  permittivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

265  :  Number  of  terrain  range/height  points 

0.0  0.0 

100.0000  0.0 

100.5682  2.0 

101.1364  2.0 

101.7045  2.0 

102.2727  3.0 

102.8409  4.0 


105 


103.4091 

103.9773 

104.5455 

105.1136 

105.6818 

106.2500 
106.8182 

107.3864 

107.9545 

108.5227 
109.0909 

109.6591 

110.2273 

110.7955 

111.3636 

111 . 9318 

112.5000 
113.0682 

113.6364 

114.2045 

114.7727 

115.3409 

115.9091 

116.4773 
117.0455 

117 . 6136 
118 .1818 

118.7500 

119.3182 

119.8864 

120.4545 
121.0227 
121.5909 
122 . 1591 
122.7273 
123.2955 
123.8636 
124.4318 
125.0000 
125.5682 
126.1364 
126.7045 
127.2727 
127.8409 

128.4091 

128 . 9773 

129.5455 

130.1136 

130.6818 

131.2500 
131.8182 

132.3864 

132.9545 

133.5227 
134.0909 

134.6591 

135.2273 

135.7955 

136.3636 

136.9318 

137.5000 
138.0682 

138.6364 

139.2045 

139.7727 

140.3409 

140.9091 

141.4773 
142.0455 

142 . 6136 
143.1818 

143.7500 

144.3182 

144.8864 

145.4545 


5.0 

4.0 

7.0 

6.0 

9.0 

12.0 

9.0 

9.0 

8.0 

10.0 

19.0 

21.0 

27.0 

32.0 

32.0 

47.0 

43.0 

58.0 

82.0 

75.0 

96.0 

63.0 

100.0 

123.0 

98.0 

95.0 

100.0 

106.0 

100.0 

108.0 

89.0 

90.0 

95.0 

89.0 

107.0 

97.0 

108.0 

87.0 

76.0 

73.0 

88.0 

86.0 

101.0 

101.0 

92.0 

65.0 

62.0 

47.0 

59.0 

44.0 

33.0 

21.0 

20.0 

21.0 

11.0 

7.0 

7.0 

4.0 

12.0 

9.0 

6.0 

5.0 

7.0 

5.0 

8.0 

14.0 

7.0 

12.0 

10.0 

8.0 

14.0 

15.0 

18.0 

29.0 

78.0 


106 


146. 

.0227 

76. 

.0 

146. 

.5909 

89. 

.0 

147  . 

.1591 

139. 

.0 

147  . 

.7273 

168. 

.0 

148  . 

.2955 

173. 

.0 

148  . 

.8636 

184  . 

.0 

149. 

.4318 

193. 

.0 

150. 

.0000 

232  . 

.0 

150. 

.5682 

227  . 

.0 

151. 

.1364 

264  . 

.0 

151. 

.7045 

222  . 

.0 

152. 

.2727 

267  . 

.0 

152. 

.8409 

247  . 

.0 

153. 

.4091 

287  . 

.0 

153. 

.  9773 

363. 

.0 

154  . 

.5455 

427  . 

.0 

155. 

.1136 

399. 

.0 

155. 

.6818 

344  . 

.0 

156. 

.2500 

258. 

.0 

156. 

.8182 

188. 

.0 

157. 

.3864 

182  . 

.0 

157. 

.9545 

94. 

.0 

158. 

.5227 

85. 

.0 

159. 

.0909 

63. 

.0 

159. 

.6591 

43. 

.0 

160. 

.2273 

18. 

.0 

160. 

.7955 

16. 

.0 

161. 

.3636 

16. 

.0 

161. 

.9318 

13. 

.0 

162. 

.5000 

21 . 

.0 

163. 

.0682 

20. 

.0 

163. 

.6364 

22  . 

.0 

164  . 

.2045 

26. 

.0 

164  . 

.7727 

27  . 

.0 

165. 

.3409 

31  . 

.0 

165. 

.9091 

45. 

.0 

166. 

.4773 

58. 

.0 

167. 

.0455 

64. 

.0 

167. 

.6136 

87. 

.0 

168. 

.1818 

92. 

.0 

168. 

.7500 

112  . 

.0 

169. 

.3182 

124  . 

.0 

169. 

.8864 

144  . 

.0 

170. 

.4545 

178  . 

.0 

171 . 

.0227 

154  . 

.0 

171 . 

.5909 

172  . 

.0 

172  . 

.1591 

192  . 

.0 

172  . 

.7273 

192  . 

.0 

173. 

.2955 

196. 

.0 

173. 

.8636 

216. 

.0 

174  . 

.4318 

222  . 

.0 

175. 

.0000 

234  . 

.0 

175. 

.5682 

236. 

.0 

176. 

.  1364 

262  . 

.0 

176. 

.7045 

287  . 

.0 

177  . 

.2727 

372  . 

.0 

177  . 

.8409 

546. 

.0 

178  . 

.4091 

699. 

.0 

178  . 

.  9773 

821 . 

.0 

179. 

.5455 

682. 

.0 

180. 

.1136 

544  . 

.0 

180. 

.6818 

477  . 

.0 

181. 

.2500 

509. 

.0 

181. 

.8182 

510. 

.0 

182  . 

.3864 

546. 

.0 

182  . 

.9545 

582. 

.0 

183. 

.5227 

844  . 

.0 

184  . 

.0909 

873. 

.0 

184  . 

.6591 

776. 

.0 

185. 

.2273 

819. 

.0 

185. 

.7955 

830. 

.0 

186. 

.3636 

814  . 

.0 

186. 

.9318 

860. 

.0 

187  . 

.5000 

870. 

.0 

188. 

.0682 

993. 

.0 
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188. 

.6364 

901. 

.0 

189. 

.2045 

886. 

.0 

189. 

.7727 

946. 

.0 

190. 

.3409 

911 . 

.0 

190. 

.9091 

1025. 

.0 

191. 

.4773 

1123. 

.0 

192  . 

.0455 

1262  . 

.0 

192  . 

.6136 

1424  . 

.0 

193. 

.1818 

1460. 

.0 

193. 

.7500 

1442  . 

.0 

194  . 

.3182 

1348. 

.0 

194  . 

.8864 

1152  . 

.0 

195. 

.4545 

940. 

.0 

196. 

.0227 

1256. 

.0 

196. 

.5909 

1111 . 

.0 

197  . 

.  1591 

943. 

.0 

197  . 

.7273 

1037. 

.0 

198. 

.2955 

931. 

.0 

198. 

.8636 

759. 

.0 

199. 

.4318 

673. 

.0 

200. 

.0000 

702  . 

.0 

200. 

.5682 

607. 

.0 

201 . 

.  1364 

649. 

.0 

201 . 

.7045 

576. 

.0 

202  . 

.2727 

551. 

.0 

202  . 

.8409 

548. 

.0 

203. 

.4091 

548. 

.0 

203. 

.  9773 

551. 

.0 

204  . 

.5455 

546. 

.0 

205. 

.1136 

545. 

.0 

205. 

.6818 

547  . 

.0 

206. 

.2500 

556. 

.0 

206. 

.8182 

569. 

.0 

207  . 

.3864 

576. 

.0 

207  . 

.9545 

610. 

.0 

208. 

.5227 

636. 

.0 

209. 

.0909 

634. 

.0 

209. 

.6591 

704  . 

.0 

210. 

.2273 

736. 

.0 

210. 

.7955 

719. 

.0 

211 . 

.3636 

702  . 

.0 

211 . 

.9318 

714  . 

.0 

212  . 

.5000 

691. 

.0 

213. 

.0682 

676. 

.0 

213. 

.6364 

671. 

.0 

214  . 

.2045 

671. 

.0 

214  . 

.7727 

708. 

.0 

215. 

.3409 

668. 

.0 

215. 

.9091 

674  . 

.0 

216. 

.4773 

688. 

.0 

217  . 

.0455 

638. 

.0 

217  . 

.6136 

661. 

.0 

218  . 

.1818 

652. 

.0 

218  . 

.7500 

673. 

.0 

219. 

.3182 

673. 

.0 

219. 

.8864 

665. 

.0 

220. 

.4545 

703. 

.0 

221 . 

.0227 

671. 

.0 

221 . 

.5909 

685. 

.0 

222  . 

.1591 

730. 

.0 

222  . 

.7273 

722  . 

.0 

223. 

.2955 

737  . 

.0 

223. 

.8636 

709. 

.0 

224  . 

.4318 

752  . 

.0 

225. 

.0000 

767  . 

.0 

225. 

.5682 

774  . 

.0 

226. 

.1364 

728  . 

.0 

226. 

.7045 

749. 

.0 

227  . 

.2727 

761. 

.0 

227  . 

.8409 

759. 

.0 

228  . 

.4091 

815. 

.0 

228  . 

.  9773 

836. 

.0 

229. 

.5455 

896. 

.0 

230. 

.1136 

924  . 

.0 

230. 

.6818 

956. 

.0 
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231 . 

.2500 

1136. 

.0 

231 . 

.8182 

1187  . 

.0 

232  . 

.3864 

1353. 

.0 

232  . 

.9545 

1313. 

.0 

233. 

.5227 

1153. 

.0 

234  . 

.0909 

1111 . 

.0 

234  . 

.6591 

1095. 

.0 

235. 

.2273 

1094. 

.0 

235. 

.7955 

1249. 

.0 

236. 

.3636 

1334. 

.0 

236. 

.9318 

1286. 

.0 

237  . 

.5000 

1235. 

.0 

238. 

.0682 

1181 . 

.0 

238. 

.6364 

1165. 

.0 

239. 

.2045 

1196. 

.0 

239. 

.7727 

1207  . 

.0 

240. 

.3409 

1257  . 

.0 

240. 

.9091 

1177  . 

.0 

241 . 

.4773 

1237  . 

.0 

242  . 

.0455 

1186. 

.0 

242  . 

.6136 

1085. 

.0 

243. 

.1818 

964. 

.0 

243. 

.7500 

897. 

.0 

244  . 

.3182 

861. 

.0 

244  . 

.8864 

806. 

.0 

245. 

.4545 

796. 

.0 

246. 

.0227 

780. 

.0 

246. 

.5909 

773. 

.0 

247  . 

.1591 

767  . 
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:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

) 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI  and  USRDEF  antenna) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
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0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 
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LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI , USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

Antenna  gain  in  dBi  (used  for  clutter  calcs) 

Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

Pulse  length  in  microseconds  (used  for  clutter  calcs) 

Transmitter  power  in  kW  (used  for  clutter  calcs) 

System  losses  in  dB  (used  for  clutter  calcs) 

Noise  figure  in  dB  (used  for  clutter  calcs) 

Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
Number  of  output  height  points 
Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 

Extrapolation  flag 

Surface  absolute  humidity  in  g/m3 

Surface  air  temperature  in  degrees 

Gaseous  absorption  attenuation  rate  in  dB/km 

:  Number  of  wind  speeds/ranges  specified 

Wind  speed  (m/s).  Range (km) 

Number  of  refractivity  profiles 

Number  of  levels  in  refractivity  profiles 

Range  of  first  refractivity  profiles  in  km 

:  Height  &  M-unit  value  of  ref.  profile  1,  level  1 
:  Height  &  M-unit  value  of  ref.  profile  1,  level  2 
Wind  direction  in  deg  (only  used  for  clutter  calcs) 

Number  of  ground  composition  types 
0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

Number  of  terrain  range/height  points 
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:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 
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1  :  Antenna  type  ( 1=0MNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

100.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 
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LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 
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:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 
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1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.23  HIEL.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

10.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

20000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  kkm 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 
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LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
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0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

200.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.25  HITRAN.IN 
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LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

100.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 
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0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.26  HORZ.IN 


. true . 

. true . 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.27  HTFIND.IN 


.true. 

.true. 

. false . 

0. 

1 . 

. false . 
. false . 
. false . 


1000. 

25. 

5 

0 

2. 

0. 

0 

0. 

0. 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 
:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '.false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 
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0. 

0. 

0. 

0. 

0. 

2000. 

50. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 

0.  ,  0, 
1 

-10.  , 

0 


:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if 
0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC / GAMRNG 

:  Number  of  terrain  range/height  points 


terrain  is  specified) 
pairs  is  0) 


8.28  LOBW.IN 


. true . 

. true . 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.’  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

.5  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 
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8.29  LOEL.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false.' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

-10.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

20000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.30  LOFREQ.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

100.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 
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0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

5000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.31  LOTRAN.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

1000.  :  Frequency  in  MHz 

1.5  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

10000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 
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8.32  MPRT.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

300.  :  Frequency  in  MHz 

800.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

0.5  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

-2.5  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1100.  :  Maximum  output  height  in  m 

60 .  :  Maximum  output  range  in  km 

1  :  Number  of  output  height  points 

30  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

7.5  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  7,  7.5,  0.01  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

5  :  Number  of  terrain  range (km) /height  points 

0.0 
10.0  0 
30.0  600 

50.0  0 

60.0  0 

8.33  PERW.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.true.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

10.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

300.  :  Frequency  in  MHz 

10.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

180.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 
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0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

1  :  Number  of  output  height  points 

20  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

7.5  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  7,  7.5,  0.01  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

I  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

II  :  Number  of  terrain  range (km) /height  points 
0.  0 

18.750  0 

20.312  210 
21.875  320 
23.4375  375 
25.000  390 
26.5625  375 
28.125  320 
31.250  90 

32.8125  0 
50.000  0 

8.34  PVT. IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

500.  :  Frequency  in  MHz 

10.  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

180.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

10.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

7.5  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 
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0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  7,  7.5,  0.01  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

17  :  Number  of  terrain  range (km) /height  points 

0.  625 

3.170  476 

6.340  347 

9.510  239 

12.690  151 

15.870  83 

19.040  35 

22.220  7 

25.000  0 

27.780  7 

30.960  35 

34.130  83 

37.310  151 

40.490  239 

43.660  347 

46.830  476 

50.000  625 

8.35  RDLONGB.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes ,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

150.  :  Frequency  in  MHz 

100.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

100.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

2  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

100.  :  Range  of  second  refractivity  profiles  in  km 
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0.  339.  :  Height  &  M-unit  value  of  ref.  profile  2,  level  1 

250.  368.5  :  Height  &  M-unit  value  of  ref.  profile  2,  level  2 

300.  319.  :  Height  &  M-unit  value  of  ref.  profile  2,  level  3 

1000.  401.6  :  Height  &  M-unit  value  of  ref.  profile  2,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

6  :  Number  of  ground  composition  types 

0.,  2,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

28.500,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

64.800,  3,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

68.700,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

74.100,  4,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

100.200,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 
167  :  Number  of  terrain  range/height  points 


0. 

.000 

8 

0. 

.300 

8 

0. 

.600 

9 

0. 

.900 

9 

1 . 

.200 

10 

1 . 

.500 

11 

1 . 

.800 

12 

2  . 

.  100 

13 

2  . 

.400 

14 

2  . 

.700 

15 

3. 

.000 

17 

3. 

.300 

19 

3. 

.600 

21 

3. 

.900 

23 

4  . 

.200 

25 

4  . 

.500 

27 

4  . 

.800 

28 

5. 

.  100 

30 

5. 

.400 

31 

5. 

.700 

31 

6. 

.000 

29 

6. 

.300 

23 

6. 

.600 

14 

6. 

.900 

9 

7  . 

.200 

7 

7  . 

.500 

7 

7  . 

.800 

9 

8. 

.100 

11 

8. 

.400 

14 

8. 

.700 

13 

9. 

.300 

13 

9. 

.600 

12 

9. 

.900 

11 

10. 

.200 

8 

10. 

.800 

8 

11 . 

.100 

7 

12  . 

.600 

7 

12  . 

.900 

6 

14  . 

.400 

6 

14  . 

.700 

7 

15. 

.000 

8 

15. 

.300 

8 

15. 

.600 

9 

15. 

.900 

10 

16. 

.200 

11 

16. 

.500 

11 

16. 

.800 

12 

17  . 

.400 

12 

17  . 

.700 

13 

18. 

.000 

13 

18. 

.300 

14 

18. 

.600 

15 

18. 

.900 

16 

19. 

.200 

18 

19. 

.500 

20 

19. 

.800 

21 

20. 

.100 

22 

20. 

.400 

23 

20. 

.700 

24 

21 . 

.000 

24 

:  Range  &  height  of  terrain  point  1  in  km 


:  Range  &  height  of  terrain  point  10  in  km 


:  Range  &  height  of  terrain  point  20  in  km 


:  Range  &  height  of  terrain  point  30  in  km 


:  Range  &  height  of  terrain  point  40  in  km 


:  Range  &  height  of  terrain  point  50  in  km 


:  Range  &  height  of  terrain  point  60  in  km 


specified) 
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21 . 

.300 

25 

21 . 

.600 

26 

21 . 

.900 

27 

22  . 

.200 

27 

22  . 

.500 

28 

22  . 

.800 

29 

23. 

.400 

29 

23. 

.700 

30 

24  . 

.600 

30 

24  . 

.900 

32 

25. 

.200 

34 

25. 

.500 

38 

26. 

.100 

38 

26. 

.400 

36 

26. 

.700 

34 

27  . 

.000 

32 

27  . 

.300 

27 

27  . 

.600 

15 

27  . 

.900 

6 

28. 

.200 

1 

28. 

.500 

0 

64. 

.500 

0 

64. 

.800 

8 

65. 

.100 

30 

65. 

.400 

39 

65. 

.700 

61 

66. 

.600 

61 

66. 

.900 

24 

67. 

.200 

14 

67. 

.500 

26 

67. 

.800 

16 

68. 

.100 

1 

68. 

.400 

1 

68. 

.700 

0 

73. 

.800 

0 

74  . 

.  100 

1 

74  . 

.400 

1 

74  . 

.700 

10 

75. 

.000 

8 

75. 

.300 

39 

75. 

.600 

45 

75. 

.900 

53 

76. 

.200 

61 

76. 

.500 

61 

76. 

.800 

82 

77  . 

.100 

61 

77  . 

.400 

78 

77  . 

.700 

61 

78. 

.000 

129 

78. 

.300 

30 

78. 

.600 

46 

78. 

.900 

159 

79. 

.200 

184 

79. 

.500 

226 

79. 

.800 

152 

80. 

.100 

201 

80. 

.400 

244 

80. 

.700 

152 

81. 

.000 

143 

81. 

.300 

91 

81. 

.600 

107 

81. 

.900 

152 

82. 

.200 

152 

82. 

.500 

170 

82. 

.800 

152 

83. 

.100 

66 

83. 

.400 

70 

83. 

.700 

121 

84. 

.000 

152 

84. 

.300 

170 

84. 

.600 

141 

84. 

.900 

139 

85. 

.200 

147 

85. 

.500 

177 

85. 

.800 

152 

Range  &  height  of  terrain  point  70  in  km 


Range  &  height  of  terrain  point  80  in  km 


Range  &  height  of  terrain  point  90  in  km 


Range  &  height  of  terrain  point  100  in  km 


Range  &  height  of  terrain  point  110  in  km 


Range  &  height  of  terrain  point  120  in  km 


Range  &  height  of  terrain  point  130  in  km 


122 


86.100 

61 

86.700 

61 

87.000 

70 

87.300 

44 

87.600 

11 

87.900 

1 

89.400 

1 

89.700 

61 

90.000 

84 

90.300 

152 

90.600 

152 

90.900 

101 

91.200 

40 

91.500 

15 

91.800 

20 

92.100 

2 

92.400 

10 

92.700 

4 

93.000 

1 

93.300 

1 

93.600 

0 

93.900 

1 

96.300 

1 

96.600 

0 

96.900 

1 

97.500 

1 

97.800 

2 

98.100 

3 

99.300 

3 

99.600 

2 

99.900 

100.200 

2 

Range  &  height  of  terrain  point  140  in  km 


Range  &  height  of  terrain  point  150  in  km 


Range  &  height  of  terrain  point  160  in  km 


Range  &  height  of  terrain  point  167  in  km 


8.36  RNGDEP.IN 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1. 

.false.  : 
. false . 
.false.  : 
3000.  : 

25.  : 

1  : 

0  : 

5.  : 

0.  : 

0 

0.  : 
0.  : 

0.  : 

0.  : 

0.  : 

0.  : 

0.  : 

2000.  : 

250.  : 

20  : 

1  : 

0 

0  : 

0.  : 

0.  : 

0.  : 

0 

2  : 

4  : 

0.  : 

0.  330. 

100.  342.5 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '.  false .' =don ' t  compute;  '.true.'=  compute 
Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

Antenna  gain  in  dBi  (used  for  clutter  calcs) 

Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

Pulse  length  in  microseconds  (used  for  clutter  calcs) 

Transmitter  power  in  kW  (used  for  clutter  calcs) 

System  losses  in  dB  (used  for  clutter  calcs) 

Noise  figure  in  dB  (used  for  clutter  calcs) 

Minimum  output  height  in  m 
Maximum  output  height  in  m 
Maximum  output  range  in  km 
Number  of  output  height  points 
Number  of  output  range  points 

:  Number  of  receiver  heights  relative  to  ground 

Extrapolation  flag 

Surface  absolute  humidity  in  g/m3 

Surface  air  temperature  in  degrees 

Gaseous  absorption  attenuation  rate  in  dB/km 

:  Number  of  wind  speeds/ranges  specified 

Number  of  refractivity  profiles 

Number  of  levels  in  refractivity  profiles 

Range  of  first  refractivity  profiles  in  km 

:  Height  &  M-unit  value  of  ref.  profile  1,  level  1 
:  Height  &  M-unit  value  of  ref.  profile  1,  level  2 
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230.  312.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

2000.  517.8  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

250.  :  Range  of  second  refractivity  profiles  in  km 

0.  330.  :  Height  &  M-unit  value  of  ref.  profile  2,  level  1 

600.  405.  :  Height  &  M-unit  value  of  ref.  profile  2,  level  2 

730.  375.  :  Height  &  M-unit  value  of  ref.  profile  2,  level  3 

2000.  522.3  :  Height  &  M-unit  value  of  ref.  profile  2,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range (km) /height  points 

8.37  SBDUCT.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

3000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

5000.  :  Maximum  output  height  in  m 

200.  :  Maximum  output  range  in  m 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  339.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

250.  368.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

300.  319.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1000.  401.6  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.38  SBDUCTRF.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 
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1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '.false.'=no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  ' . false .' =don ' t  compute;  ' .true. '=  compute 

3000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

2  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

5.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

200.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

1  :  Number  of  wind  speeds/ranges  specified 

10.,  0.  :  Wind  speed  (m/s).  Range (km) 

1  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  339.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

250.  368.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

300.  319.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1000.  401.6  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 


8.39  SINEX.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  ' .true. '=  compute 

1000.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

3  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

50.0  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 
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0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 

0.,  0,  0 
1 

-10.,  0. 

0 


:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 


8.40  TROPOS.IN 


.true, 
.true. 
. false 

0. 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


otherwise) 


1. 

.true. 

. false . 

. false . 
100. 

25. 

1 

0 

0. 

0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

2000. 

200. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 

0.,  0,  0. 

1 

-10.,  0. 

0 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  m 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 


8.41  TROPOT.IN 


.true . 
.  true . 
.  false 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 
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0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.true.  :  Troposcatter  flag:  false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

100.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

0  :  Polarization  (0=HOR,  1=VER) 

0.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI , USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

2000.  :  Maximum  output  height  in  m 

200.  :  Maximum  output  range  in  m 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

6  :  Number  of  ground  composition  types 

0.,  2,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

28.500,  0,  0.,  0. 

64.800,  3,  0.,  0. 

68.700,  0,  0.,  0. 

74.100,  4,  0.,  0. 

100.200,  0,  0.,  0. 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

169  :  Number  of  terrain  range/height  points 

0.000  8  :  Range (km)  &  height (m)  of  terrain  point  1 

0.300  8 

0.600  9 

0.900  9 

1.200  10 

1.500  11 

1.800  12 

2.100  13 

2.400  14 

2.700  15  :  Range (km)  &  height (m)  of  terrain  point  10 

3.000  17 

3.300  19 

3.600  21 

3.900  23 

4.200  25 

4.500  27 

4.800  28 

5.100  30 

5.400  31 

5.700  31  :  Range (km)  &  height (m)  of  terrain  point  20 

6.000  29 

6.300  23 

6.600  14 

6.900  9 

7.200  7 

7.500  7 

7.800  9 

8.100  11 

8.400  14 
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6 

14  . 
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8 

15. 
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8 
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9 

15. 
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11 
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11 
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13 
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13 

18. 
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18. 
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16 

19. 

.200 

18 

19. 
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20 

19. 

.800 

21 

20. 

.100 

22 

20. 

.400 

23 

20. 

.700 

24 

21 . 

.000 

24 

21 . 

.300 

25 

21 . 

.600 

26 

21 . 

.900 

27 

22  . 

.200 

27 

22  . 

.500 

28 

22  . 

.800 

29 

23. 

.400 

29 

23. 

.700 

30 

24  . 

.600 

30 

24  . 

.900 

32 

25. 

.200 

34 

25. 

.500 

38 

26. 

.100 

38 

26. 

.400 

36 

26. 

.700 

34 

27  . 

.000 

32 

27  . 

.300 

27 

27  . 

.600 

15 

27  . 

.900 

6 

28. 

.200 

1 

28. 

.500 

0 

64. 

.500 

0 

64. 

.800 

8 

65. 

.100 

30 

65. 

.400 

39 

65. 

.700 

61 

66. 

.600 

61 

66. 

.900 

24 

67. 

.200 

14 

67. 

.500 

26 

67. 

.800 

16 

68. 

.100 

1 

68. 

.400 

1 

68. 

.700 

0 

73. 

.800 

0 

74  . 

.100 

1 

74  . 

.400 

1 

74  . 

.700 

10 

75. 

.000 

8 

75. 

.300 

39 

75. 

.600 

45 

75. 

.900 

53 

76. 

.200 

61 

76. 

.500 

61 

Range (km)  &  height (m)  of  terrain  point  30 


Range (km)  &  height (m)  of  terrain  point  40 


Range (km)  &  height (m)  of  terrain  point  50 


Range (km)  &  height (m)  of  terrain  point  60 


Range (km)  &  height (m)  of  terrain  point  70 


Range (km)  &  height (m)  of  terrain  point  80 


Range (km)  &  height (m)  of  terrain  point  90 


Range (km)  &  height (m)  of  terrain  point  100 
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76.800 

82 

77 . 100 

61 

77.400 

78 

77.700 

61 

78.000 

129 

78.300 

30 

78.600 

46 

78.900 

159 

79.200 

184 

79.500 

226 

79.800 

152 

80.100 

201 

80.400 

244 

80.700 

152 

81.000 

143 

81.300 

91 

81 . 600 

107 

81 . 900 

152 

82.200 

152 

82.500 

170 

82.800 

152 

83.100 

66 

83.400 

70 

83.700 

121 

84.000 

152 

84.300 

170 

84.600 

141 

84.900 

139 

85.200 

147 

85.500 

177 

85.800 

152 

86.100 

61 

86.700 

61 

87.000 

70 

87.300 

44 

87.600 

11 

87.900 

1 

89.400 

1 

89.700 

61 

90.000 

84 

90.300 

152 

90.600 

152 

90.900 

101 

91.200 

40 

91.500 

15 

91.800 

20 

92.100 

2 

92.400 

10 

92.700 

4 

93.000 

1 

93.300 

1 

93.600 

0 

93.900 

1 

96.300 

1 

96.600 

0 

96.900 

1 

97.500 

1 

97.800 

2 

98.100 

3 

99.300 

3 

99.600 

2 

99.900 

100.200 

2 

100.200 

0 

200.000 

0 

:  Range (km)  &  height (m)  of  terrain  point  110 


:  Range (km)  &  height (m)  of  terrain  point  120 


:  Range (km)  &  height (m)  of  terrain  point  130 


:  Range (km)  &  height (m)  of  terrain  point  140 


:  Range (km)  &  height (m)  of  terrain  point  150 


:  Range (km)  &  height (m)  of  terrain  point  160 


Range (km)  &  height (m)  of  terrain  point  167 


8.42  USERDEFA 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 
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1. 

. false . 
. false . 
. false . 
900. 

6. 

7 

0 

0. 

2  . 

54 

-17 

-16 

-15 

-14 

-13 

-12 

-11 

-10 

-9 

-8 

-7 

-6 

-5 

-4 

-3 

-2 

-1 

0 

1 

2 

3 

4 

5 

6 

7 

8 

9 

10 
11 
12 

13 

14 

15 

16 

17 

18 

19 

20 
21 
22 

23 

24 

25 

26 

27 

28 

29 

30 

31 

32 

33 

34 

35 

36 
0. 

0. 

0. 

0. 

0. 

0. 

0. 

3000. 

300. 

20 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

0.017 

0.044 

0.080 

0.126 

0.182 

0.245 

0.316 

0.389 

0.479 

0.556 

0.631 

0.716 

0.785 

0.861 

0.912 

0.966 

0.998 

1.000 

1.000 

0.966 

0.902 

0.822 

0.742 

0.646 

0.569 

0.501 

0.452 

0.422 

0.402 

0.389 

0.375 

0.359 

0.339 

0.305 

0.276 

0.245 

0.221 

0.210 

0.199 

0.190 

0.180 

0.164 

0.148 

0.130 

0.110 

0.095 

0.077 

0.070 

0.065 

0.058 

0.050 

0.039 

0.031 

0.025 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
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1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  339.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

250.  368.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

300.  319.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1000.  401.6  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if 

0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC / GAMRN G 

:  Number  of  terrain  range/height  points 


-10. 


terrain  is  specified) 
pairs  is  0) 


8.43  USERHF.IN 


.true. 

.true. 

. false . 

0. 

otherwise) 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 


1. 


. false . 

. false . 

. false . 
1000. 

25. 

6 
0 
1 . 

0. 

10 

1.0  0.9 

1.5  0.8 

2.0  0.7 

2.5  0.6 

3.0  0.5 

3.5  0.4 

4.0  0.3 

4.5  0.2 

5.0  0.1 

5.5  0.0 
0. 

0. 

0. 

0. 

0. 

0. 

0. 

2000. 

50.0 

20 


1 

0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 


:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 


:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 
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1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.44  VERT.IN 


.true. 

.true. 

. false . 

0. 

otherwise 

1 . 

. false . 

. false . 

. false . 
1000. 

25. 

1 

1 

0. 

0. 

0 

0. 

0. 

0. 

0. 

0. 

0. 

0. 

2000. 

50. 

20 

1 

0 

0 

0. 

0. 

0. 

0 

1 

2 

0. 

0. 

1000. 

0. 

1 

0.,  0,  0. 
1 

-10.,  0. 

0 


:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

) 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

:  Transmitter  power  in  kW  (used  for  clutter  calcs) 

:  System  losses  in  dB  (used  for  clutter  calcs) 

:  Noise  figure  in  dB  (used  for  clutter  calcs) 

:  Minimum  output  height  in  m 
:  Maximum  output  height  in  m 
:  Maximum  output  range  in  km 
:  Number  of  output  height  points 
:  Number  of  output  range  points 
:  Number  of  receiver  heights  relative  to  ground 
:  Extrapolation  flag 
:  Surface  absolute  humidity  in  g/m3 
:  Surface  air  temperature  in  degrees 
:  Gaseous  absorption  attenuation  rate  in  dB/km 
:  Number  of  wind  speeds/ranges  specified 
:  Number  of  refractivity  profiles 
:  Number  of  levels  in  refractivity  profiles 
:  Range  of  first  refractivity  profiles  in  km 
350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

:  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

:  Number  of  ground  composition  types 
,  0.  :  Range(km),  ground  type  (integer),  permittivity,  conductivity 

:  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
:  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

:  Number  of  terrain  range/height  points 
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:  LERR6  error  flag 
:  LERR12  error  flag 

:  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 
:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

:  Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
:  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
:  Frequency  in  MHz 
:  Antenna  height  in  m 

:  Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

:  Polarization  (0=HOR,  1=VER) 

:  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

:  Number  of  angle/factor  pairs  (used  for  antenna  types  6  and  7) 

:  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

:  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

:  Pulse  length  in  microseconds  (used  for  clutter  calcs) 
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0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

2  :  Number  of  ground  composition  types 

0.,  4,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

25.0,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

2  :  Number  of  terrain  range/height  points 

0.  0.  :  Range (km)  &  height (m)  of  terrain  point  1 

50.  0.  :  Range (km)  &  height (m)  of  terrain  point  2 

8.46  VERTSEA.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored  otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

100.  :  Frequency  in  MHz 

25.  :  Antenna  height  in  m 

1  :  Antenna  type  ( l=OMNI , 2=GAUSS, 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

300.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

4  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  339.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

250.  368.5  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

300.  319.0  :  Height  &  M-unit  value  of  ref.  profile  1,  level  3 

1000.  401.6  :  Height  &  M-unit  value  of  ref.  profile  1,  level  4 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 
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1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

0  :  Number  of  terrain  range/height  points 

8.47  VERTUSRD.IN 


.true.  :  LERR6  error  flag 

.true.  :  LERR12  error  flag 

.false.  :  Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

0.  :  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

otherwise) 

1.  :  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 

.false.  :  Troposcatter  flag:  '.false. ' =no  troposcatter ,  ' . true . ' =troposcatter 

.false.  :  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 

.false.  :  Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 

100.  :  Frequency  in  MHz 

10.  :  Antenna  height  in  m 

1  :  Antenna  type  (l=OMNI, 2=GAUSS, 3=SINC (X) , 4=COSEC2, 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 

1  :  Polarization  (0=HOR,  1=VER) 

1.  :  Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0.  :  Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

0  :  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 

0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

50 .  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  7,  3.,  6.e-4  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 
-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

2  :  Number  of  terrain  range/height  points 

0.  0.  :  Range (km)  &  height (m)  of  terrain  point  1 

50.  0.  :  Range (km)  &  height (m)  of  terrain  point  2 

8.48  WEDGE. IN 


.true. 

.true. 

. false . 

0. 

otherwise) 

1. 

. false . 

. false . 

. false . 
1000. 

25. 

1 

0 

1. 

0. 

0 


LERR6  error  flag 
LERR12  error  flag 

Perform  PE  calcs  only?  ('.true.'  =  yes,  '.false.'  =  no) 

:  Maximum  PE  calculation  angle  in  degrees  (required  if  using  PE  calcs  only,  ignored 

:  PE  range  step  multiplier  (required  if  using  PE  calcs  only,  ignored  otherwise) 
Troposcatter  flag:  '. false. ' =no  troposcatter,  ' . true . ' =troposcatter 
:  Clutter  flag:  '. false. ' =no  clutter,  ' . true . ' =clutter  calcs 
Propagation  angle/factor  flag:  '. false .' =don ' t  compute;  '.true.'=  compute 
Frequency  in  MHz 
Antenna  height  in  m 

Antenna  type  ( l=OMNI , 2=GAUSS , 3=SINC (X) , 4=COSEC2 , 5=HTFIND, 6=USRHTFIND, 7=USRDEF, 8=QWVD) 
Polarization  (0=HOR,  1=VER) 

Beamwidth  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 

Antenna  elevation  angle  in  deg  (this  value  is  ignored  for  OMNI,USRDEF,  and  QWVD  antennas) 
:  Number  of  cut-back  angles  and  factors  (used  for  specific  height-finder  antenna) 
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0.  :  Antenna  gain  in  dBi  (used  for  clutter  calcs) 

0.  :  Horizontal  beamwidth  in  deg  (used  for  clutter  calcs) 

0.  :  Pulse  length  in  microseconds  (used  for  clutter  calcs) 

0.  :  Transmitter  power  in  kW  (used  for  clutter  calcs) 

0.  :  System  losses  in  dB  (used  for  clutter  calcs) 

0.  :  Noise  figure  in  dB  (used  for  clutter  calcs) 

0.  :  Minimum  output  height  in  m 

1000.  :  Maximum  output  height  in  m 

100.  :  Maximum  output  range  in  km 

20  :  Number  of  output  height  points 

1  :  Number  of  output  range  points 

0  :  Number  of  receiver  heights  relative  to  ground 

0  :  Extrapolation  flag 

0.  :  Surface  absolute  humidity  in  g/m3 

0.  :  Surface  air  temperature  in  degrees 

0.  :  Gaseous  absorption  attenuation  rate  in  dB/km 

0  :  Number  of  wind  speeds/ranges  specified 

1  :  Number  of  refractivity  profiles 

2  :  Number  of  levels  in  refractivity  profiles 

0.  :  Range  of  first  refractivity  profiles  in  km 

0.  350.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  1 

1000.  468.  :  Height  &  M-unit  value  of  ref.  profile  1,  level  2 

0.  :  Wind  direction  in  deg  (only  used  for  clutter  calcs) 

1  :  Number  of  ground  composition  types 

0.,  0,  0.,  0.  :  Range (km),  ground  type  (integer),  permittivity,  conductivity 

1  :  Number  of  GAMMAC  &  GAMRNG  pairs  (used  for  clutter  calcs-MUST  be  >  0  if  terrain  is  specified) 

-10.,  0.  :  GAMMAC  (dB) ,  GAMRNG  (km)  -  1st  pair  (remove  line  if  #  of  GAMMAC/GAMRNG  pairs  is  0) 

5  :  Number  of  terrain  range/height  points 

0.  0.  :  Range (km)  &  height (m)  of  terrain  point  1 

45.0  0.  :  Range (km)  &  height (m)  of  terrain  point  2 

50.0  200.  :  Range (km)  &  height (m)  of  terrain  point  3 

55.0  0.  :  Range (km)  &  height (m)  of  terrain  point  4 

100.0  0.  :  Range (km)  &  height (m)  of  terrain  point  5 
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Approved  for  public  release;  distribution  is  unlimited. 


